Index: openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl,v diff -u -r1.86.2.6 -r1.86.2.7 --- openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl 18 Aug 2022 16:02:08 -0000 1.86.2.6 +++ openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl 19 Aug 2022 10:25:29 -0000 1.86.2.7 @@ -210,10 +210,18 @@ } { Get the portal_id for a particular user } { - ::dotlrn::dotlrn_user_cache eval -partition_key $user_id \ - $user_id-portal_id { - dotlrn::get_portal_id_not_cached -user_id $user_id - } + if {[::namespace::which ::dotlrn::dotlrn_user_cache] ne ""} { + ::dotlrn::dotlrn_user_cache eval -partition_key $user_id \ + $user_id-portal_id { + dotlrn::get_portal_id_not_cached -user_id $user_id + } + } else { + # + # Cache was not created yet, e.g. because the package is + # just being installed. + # + dotlrn::get_portal_id_not_cached -user_id $user_id + } # # acs::try_cache could improve caching here, but has # intentionally been defined as a private interface, so the