Index: openacs-4/packages/acs-api-browser/www/display-sql.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/display-sql.tcl,v
diff -u -r1.4.10.2 -r1.4.10.3
--- openacs-4/packages/acs-api-browser/www/display-sql.tcl	16 Sep 2013 20:38:39 -0000	1.4.10.2
+++ openacs-4/packages/acs-api-browser/www/display-sql.tcl	16 Oct 2013 20:08:07 -0000	1.4.10.3
@@ -29,7 +29,7 @@
 }
 
 set context [list]
-if {[exists_and_not_null version_id]} {
+if {$version_id ne ""} {
     db_0or1row package_info_from_package_id {
         select pretty_name, package_key, version_name
           from apm_package_version_info
@@ -55,7 +55,7 @@
     return
 }
 
-if {[exists_and_not_null package_key]} {
+if { $package_key ne "" } {
     set safe_p [regexp {/?(.*)} $url package_url]
 }