Index: openacs-4/packages/acs-authentication/tcl/sync-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/sync-procs.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/acs-authentication/tcl/sync-procs.tcl	10 Sep 2003 13:37:37 -0000	1.10
+++ openacs-4/packages/acs-authentication/tcl/sync-procs.tcl	10 Sep 2003 14:26:06 -0000	1.11
@@ -11,10 +11,10 @@
 namespace eval auth::sync::job {}
 namespace eval auth::sync::get_doc {}
 namespace eval auth::sync::get_doc::http {}
+namespace eval auth::sync::entry {}
 namespace eval auth::sync::process_doc {}
 namespace eval auth::sync::process_doc::ims {}
 
-
 #####
 #
 # auth::sync::job namespace
@@ -580,9 +580,30 @@
     return [array get result]
 }
 
+#####
+#
+# auth::sync::entry namespace
+#
+#####
 
+ad_proc -public auth::sync::entry::get {
+    {-entry_id:required}
+    {-array:required}
+} {
+    Get information about a batch entry in an array.
 
+    @param entry_id        The ID of the batch entry you're ending.
+    
+    @param array         Name of an array into which you want the information.
+    
+    @author Peter Marklund
+} {
+    upvar 1 $array row
 
+    db_1row select_entry {} -column_array row
+}
+
+
 #####
 #
 # auth::sync::process_doc::ims namespace
@@ -681,4 +702,3 @@
             -url $url
     }
 }
-