[Openmcl-cvs-notifications] r7438 - /trunk/ccl/cocoa-ide/cocoa-editor.lisp

[gb at clozure.com]

Author: gb
Date: Sun Oct 14 04:53:25 2007
New Revision: 7438

Log:
Conditionalize out an _NSLog call in #/replaceCharactersInRange:withString:

Modified:
    trunk/ccl/cocoa-ide/cocoa-editor.lisp

Modified: trunk/ccl/cocoa-ide/cocoa-editor.lisp
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/ccl/cocoa-ide/cocoa-editor.lisp (original)
+++ trunk/ccl/cocoa-ide/cocoa-editor.lisp Sun Oct 14 04:53:25 2007
@@ -603,7 +603,7 @@
 000
 (objc:defmethod (#/replaceCharactersInRange:withString: :void)
     ((self hemlock-text-storage) (r :<NSR>ange) string)
-  #+debug 0 (#_NSLog #@"Replace in range %ld/%ld with %@"
+  #+debug (#_NSLog #@"Replace in range %ld/%ld with %@"
                     :<NSI>nteger (pref r :<NSR>ange.location)
                     :<NSI>nteger (pref r :<NSR>ange.length)
                     :id string)