[bknr-cvs] ksprotte changed trunk/projects/bos/m2/m2.lisp

BKNR Commits bknr at bknr.net
Thu Jul 17 12:19:24 UTC 2008


Revision: 3484
Author: ksprotte
URL: http://bknr.net/trac/changeset/3484

again indentation

U   trunk/projects/bos/m2/m2.lisp

Modified: trunk/projects/bos/m2/m2.lisp
===================================================================
--- trunk/projects/bos/m2/m2.lisp	2008-07-17 12:18:34 UTC (rev 3483)
+++ trunk/projects/bos/m2/m2.lisp	2008-07-17 12:19:24 UTC (rev 3484)
@@ -161,7 +161,7 @@
   "Return a unique number to use when generating a sponsor.
   Uniqueness is guaranteed only across the running time of the process."
   (bknr.datastore::mp-with-lock-held (*sponsor-counter-lock*)
-                                     (incf *sponsor-counter*)))
+    (incf *sponsor-counter*)))
 
 (defun make-sponsor (&rest initargs &key login &allow-other-keys)
   (apply #'make-object 'sponsor




More information about the Bknr-cvs mailing list