Rearranged messages.

[moira.git] / server / qrtn.qc

diff --git a/server/qrtn.qc b/server/qrtn.qc
index 8461bab4e4db5f8eeff645afd98d5402733ba135..162f2f352d48914eb02f6100eb1bd09fc5bcf332 100644 (file)
--- a/server/qrtn.qc
+++ b/server/qrtn.qc
@@ -6,9 +6,12 @@
  *     Copyright (C) 1987 by the Massachusetts Institute of Technology
  *
  *     $Log$
- *     Revision 1.6  1987-08-04 01:30:54  wesommer
- *     Mike's changes; checked in prior to working over messages.
+ *     Revision 1.7  1987-08-04 01:49:20  wesommer
+ *     Rearranged messages.
  *
+ * Revision 1.6  87/08/04  01:30:54  wesommer
+ * Mike's changes; checked in prior to working over messages.
+ * 
  * Revision 1.5  87/06/21  16:37:58  wesommer
  * Changed include files, reindented things.
  * 
@@ -383,7 +386,6 @@ check_query_access(q, argv, cl)
 ##     retrieve (def_uid = users.users_id) where users.login = "default"
     }
 
-    com_err(whoami, 0, "checking for default access");
     /* check for default access */
 ##  range of m is members
 ##  repeat retrieve (exists = any(m.#member_id where m.list_id = @acl_id and
@@ -394,7 +396,6 @@ check_query_access(q, argv, cl)
     status = get_client(cl, &client_type, &client_id);
     if (status != SMS_SUCCESS) return(status);
 
-    com_err(whoami, 0, "checking for client in acl");
     /* see if client is in the list (or any of its sub-lists) */
     exists = find_member(acl_id, client_type, client_id, 0);
     return ((exists) ? SMS_SUCCESS : SMS_PERM);
@@ -454,7 +455,6 @@ get_client(cl, client_type, client_id)
     if (exists) return(1);
 
     /* are there any sub-lists? */
-    com_err(whoami, 0, "checking for sub-lists");
 ##  repeat retrieve (exists = any(m.#member_id where m.#list_id = @list_id and
 ##                   m.#member_type = "LIST"))
     if (!exists) return(0);
@@ -479,7 +479,6 @@ get_client(cl, client_type, client_id)
 
     if (child) return;
 
-    com_err(whoami, 0, "checking for client in sub-lists");
     /* at top-level, check sub-lists for client (breadth-first search) */
     while (sq_get_data(sq, &sublist)) {
        exists = find_member(sublist, member_type, member_id, sq);