Index: openacs-4/packages/acs-lang/tcl/lang-message-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-message-procs-postgresql.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-lang/tcl/lang-message-procs-postgresql.xql	1 Nov 2002 21:35:15 -0000	1.3
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs-postgresql.xql	12 Nov 2002 22:34:19 -0000	1.4
@@ -19,4 +19,14 @@
      </querytext>
  </fullquery>
 
+  <fullquery name="lang::message::register.select_an_existing_message">
+    <querytext>
+        select message
+          from lang_messages
+         where message_key = :message_key
+           and package_key = :package_key
+          limit 1
+    </querytext>
+  </fullquery>
+
 </queryset>