file-watch.tcl
Watches a number of files for reload. Note that the paths given to this page should be relative to package root, not server root.
- Location:
- /packages/acs-admin/www/apm/file-watch.tcl
- Author:
- Peter Marklund
- Created:
- 17 April 2000
- CVS ID:
$Id: file-watch.tcl,v 1.14 2018/01/19 13:40:40 gustafn Exp $
Related Files
[ hide source ] | [ make this the default ]
File Contents
ad_page_contract { Watches a number of files for reload. Note that the paths given to this page should be relative to package root, not server root. @author Peter Marklund @creation-date 17 April 2000 @cvs-id $Id: file-watch.tcl,v 1.14 2018/01/19 13:40:40 gustafn Exp $ } { version_id:naturalnum,notnull paths:multiple {return_url:localurl ""} } set package_key [apm_package_key_from_version_id $version_id] foreach path $paths { apm_file_watch "packages/$package_key/$path" } ad_returnredirect $return_url ad_script_abort # Local variables: # mode: tcl # tcl-indent-level: 4 # indent-tabs-mode: nil # End:
