- ACS-Admin:

  Added warning messages

www/apm/index.tcl

@@ -128,7 +128,7 @@ $table
 <li><a href=\"package-add\">Create a new package.</a>
 <li><a href=\"write-all-specs\">Write new specification files for all installed, locally generated packages</a>
 <li><a href=\"package-load\">Load a new package from a URL or local directory.</a>
-<li><a href=\"packages-install\">Install packages.</a>
+<li><a href=\"packages-install\">Install packages</a> (<font color=red>Warning</font>: Installing new packages can break your system. Please make sure you know what you are doing.)
 </ul>
 "
 

www/apm/packages-install.tcl

@@ -63,7 +63,10 @@ foreach spec_file $all_spec_files {
 
 apm_log APMDebug $spec_files
 
-ns_write "Done.<p>
+ns_write "Done.
+<p>
+<font color=red>Warning</font>: Installing new packages can break your system. Please make sure you know what you are doing.
+<p>
 "
 
 if { $spec_files eq "" } {

www/apm/version-view.tcl

@@ -253,7 +253,10 @@ if { $installed_p eq "t" } {
     
     if { $installed_p eq "t" } {	
 	append body "
-	<li><a href=\"package-delete?[export_vars { version_id }]\">Uninstall this package from your system.</a> (be very careful!)\n"
+	<li><a href=\"package-delete?[export_vars { version_id }]\">Uninstall this package from your system.</a> (<font color=red>Warning</font>: Uninstalling packages can break your system. Not all dependencies may be maintained.)
+
+
+\n"
 	
     }
 }