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 -r1.37 -r1.38
--- openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl	5 Jun 2005 19:19:15 -0000	1.37
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl	5 Jun 2005 19:41:58 -0000	1.38
@@ -752,25 +752,4 @@
 	    set foreign_var "\[$foreign_var\]"
 	}
     }
-}
-
-ad_proc -public lang::util::convert_from_hash {
-    {-hashed_key:required}
-} {
-    Converts a string with #message_key# syntax to something that can
-    be used in select boxes
-    
-    @author Malte Sussdorff (sussdorff@sussdorff.de)
-    @creation-date 2005-06-05
-    
-    @param hashed_key
-
-    @return 
-    
-    @error 
-} {
-    
-    regsub -all {(\#([-a-zA-Z0-9_:\.]+)\#)} $hashed_key {[lang::message::lookup [ad_conn locale] {\2}]} hashed_key
-    return [subst $hashed_key]
-    
-}
+}
\ No newline at end of file