Index: openacs-4/packages/acs-core-docs/tcl/acs-core-docs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-core-docs/tcl/acs-core-docs-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-core-docs/tcl/acs-core-docs-procs.tcl	30 Nov 2002 17:16:14 -0000	1.4
+++ openacs-4/packages/acs-core-docs/tcl/acs-core-docs-procs.tcl	27 Oct 2014 16:39:15 -0000	1.5
@@ -14,10 +14,10 @@
 } {
     set uninstalled [list]
     # Determine which spec files are not installed
-    foreach spec_file [apm_scan_packages "[acs_root_dir]/packages"] {
+    foreach spec_file [apm_scan_packages "$::acs::rootdir/packages"] {
         if { ! [catch {array set version [apm_read_package_info_file $spec_file]} errMsg] } { 
             if { ! [apm_package_registered_p $version(package.key)] } {
-                if {[empty_string_p $version(package-name)]} { 
+                if {$version(package-name) eq ""} { 
                     set version(package-name) $version(package.key)
                 }
                 lappend uninstalled [list $version(package.key) $version(package-name)]