Index: openacs-4/packages/acs-admin/www/auth/authority.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/auth/authority.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/acs-admin/www/auth/authority.tcl	29 Oct 2003 14:04:05 -0000	1.16
+++ openacs-4/packages/acs-admin/www/auth/authority.tcl	30 Oct 2003 18:00:09 -0000	1.17
@@ -297,7 +297,11 @@
 
 set context [list [list "." "Authentication"] $page_title]
 
-set num_users [lc_numeric [db_string num_users_in_auhtority { select count(*) from users where authority_id = :authority_id }]]
+if { [exists_and_not_null authority_id] } {
+    set num_users [lc_numeric [db_string num_users_in_auhtority { select count(*) from users where authority_id = :authority_id }]]
+} else {
+    set num_users 0
+}
 set show_users_url [export_vars -base ../users/complex-search { authority_id { target one } }]