Index: openacs-4/packages/new-portal/www/themes/kelp-theme/dotlrn/dotlrn-master-kelp.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/themes/kelp-theme/dotlrn/dotlrn-master-kelp.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/new-portal/www/themes/kelp-theme/dotlrn/dotlrn-master-kelp.tcl	4 Jan 2008 17:54:34 -0000	1.3
+++ openacs-4/packages/new-portal/www/themes/kelp-theme/dotlrn/dotlrn-master-kelp.tcl	29 Sep 2013 13:59:55 -0000	1.4
@@ -42,7 +42,7 @@
 #
 # $Id$
 
-set user_id [ad_get_user_id] 
+set user_id [ad_conn user_id] 
 set community_id [dotlrn_community::get_community_id]
 set dotlrn_url [dotlrn::get_url]
 
@@ -150,7 +150,7 @@
 }
 
 # Set up some basic stuff
-set user_id [ad_get_user_id]
+set user_id [ad_conn user_id]
 if { [ad_conn untrusted_user_id] == 0 } {
     set user_name {}
 } else {