Index: openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl,v
diff -u -N -r1.32.2.1 -r1.32.2.2
--- openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl	18 Mar 2004 09:07:46 -0000	1.32.2.1
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl	18 Mar 2004 16:15:55 -0000	1.32.2.2
@@ -73,7 +73,7 @@
 
     @author Peter marklund (peter@collaboraid.biz)
 } {
-    return {(<#\s*?([-a-zA-Z0-9_:\.]+)\s+(.+?)#>)}
+    return {(<#\s*?([-a-zA-Z0-9_:\.]+)\s+(.+?)\s*?#>)}
 }
 
 ad_proc lang::util::get_temporary_tags_indices { adp_file_string } {
Index: openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl,v
diff -u -N -r1.15.2.2 -r1.15.2.3
--- openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl	18 Mar 2004 10:12:38 -0000	1.15.2.2
+++ openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl	18 Mar 2004 16:15:55 -0000	1.15.2.3
@@ -508,7 +508,7 @@
     set new_key_3 "key_1"
     set new_text_3 "$messages_array(key_1)"
     puts $tcl_file_id "# The following key should be auto-generated and inserted
-    # <#${new_key_1} ${new_text_1}#>
+    # <#  ${new_key_1} ${new_text_1} #>
     #
     # The following key should be made unique and inserted
     # <#${new_key_2} ${new_text_2}#>