Index: openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl,v
diff -u -r1.42 -r1.43
--- openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl	9 Aug 2002 18:39:32 -0000	1.42
+++ openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl	27 Oct 2014 16:41:42 -0000	1.43
@@ -20,7 +20,7 @@
 
     @creation-date September 30 2001
     @author Arjun Sanyal (arjun@openforce.net)
-    @version $Id$
+    @cvs-id $Id$
 
 }
 
@@ -63,7 +63,7 @@
 
         @return element_id The new element's id
     } {
-        if {[empty_string_p $extra_params]} {
+        if {$extra_params eq ""} {
             set extra_params [list]
         }