Changeset 14491

Timestamp:

Dec 16, 2010, 4:14:32 PM (14 years ago)

Author:

Gary Byers

Message:

Needs more testing on Cocotron ...

File:

• trunk/source/cocoa-ide/cocoa-editor.lisp (modified) (2 diffs)

trunk/source/cocoa-ide/cocoa-editor.lisp

@@ -1150 +1150 @@
 
 
-(defmethod compute-temporary-attributes ((self hemlock-textstorage-text-view))
-  (let* ((container (#/textContainer self))
+(defmethod compute-temporary-attributes ((self hemlock-textstorage-text-view))    (let* ((container (#/textContainer self))
          ;; If there's a containing scroll view, use its contentview         
          ;; Otherwise, just use the current view.
@@ -1164 +1163 @@
          (start (ns:ns-range-location char-range))
          (length (ns:ns-range-length char-range)))
+                                                                                    #-cocotron
     (when (> length 0)
       ;; Remove all temporary attributes from the character range