Index: openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl,v
diff -u -N -r1.102.2.1 -r1.102.2.2
--- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	10 Aug 2019 18:19:46 -0000	1.102.2.1
+++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	23 Feb 2021 13:08:02 -0000	1.102.2.2
@@ -343,8 +343,9 @@
         # portlet stuff
         #
 
-        # get the user's portal
-        set portal_id [dotlrn::get_portal_id_not_cached -user_id $user_id]
+        # Get the user's portal, avoid a stale cache
+        ::dotlrn::dotlrn_user_cache flush -partition_key $user_id $user_id-portal_id
+        set portal_id [dotlrn::get_portal_id -user_id $user_id]
 
         set args [ns_set create]
         ns_set put $args package_id $package_id