Index: openacs-4/packages/acs-lang/tcl/lang-message-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-message-procs.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-lang/tcl/lang-message-procs.xql 21 Oct 2002 11:39:12 -0000 1.2
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs.xql 3 Dec 2002 17:26:54 -0000 1.3
@@ -10,6 +10,15 @@
+
+
+ select count(*)
+ from lang_messages
+ where package_key = :package_key
+ and message_key = :message_key
+
+
+
insert into lang_message_keys