Skip to content

I
intranet-filestorage-size-indicator
Commit 7f67774e authored by Frank Bergmann's avatar Frank Bergmann
Browse files
Options

- replace ad_parameter by im_parameter for OpenACS

parent 23276dd4
Pipeline #920 failed with stages
      Hide whitespace changes
      Inline Side-by-side
      Showing with 3 additions and 3 deletions
      tcl/intranet-filestorage-size-indicator-procs.tcl
      View file @ 7f67774e
      ......@@ -61,9 +61,9 @@ ad_proc -public im_filestorage_size_indicator_sweeper { } {
      if {$size <= $available_space} { return }
      set system_name [ad_system_name]
      set sender_email [ad_parameter -package_id [ad_acs_kernel_id] SystemOwner "" [ad_system_owner]]
      set system_owner_email [ad_parameter -package_id [im_package_forum_id] ReportThisErrorEmail]
      set target_email [ad_parameter -package_id [im_package_core_id] SecurityBreachEmail -default "support@project-open.com"]
      set sender_email [im_parameter -package_id [ad_acs_kernel_id] SystemOwner "" [ad_system_owner]]
      set system_owner_email [im_parameter -package_id [im_package_forum_id] ReportThisErrorEmail]
      set target_email [im_parameter -package_id [im_package_core_id] SecurityBreachEmail -default "support@project-open.com"]
      # Get intersting info
      set host [info hostname]
      ......
      Markdown is supported
      0% or
      You are about to add 0 people to the discussion. Proceed with caution.
      Finish editing this message first!
      Please register or to comment