Changeset 7480


Ignore:
Timestamp:
Oct 19, 2007, 7:46:42 PM (14 years ago)
Author:
rme
Message:

Call function HYPERSPEC-ROOT-URL instead of referencing
the corresponding special variable.

Make #/newDisplayDocumentWithTitle:content: return an
:id instead of nil, thereby avoiding a huge backtrace.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/cocoa-ide/cocoa-editor.lisp

    r7476 r7480  
    20932093    (cond ((eql action (@selector #/hyperSpecLookUp:))
    20942094           ;; For now, demand a selection.
    2095            (and *hyperspec-root-url*
     2095           (and (hyperspec-root-url)
    20962096                (not (eql 0 (ns:ns-range-length (#/selectedRange self))))))
    20972097          ((eql action (@selector #/cut:))
     
    27912791           string)
    27922792          (#/endEditing ts))
    2793         (#/makeKeyAndOrderFront:
    2794          window
    2795          self)))))
     2793        (#/makeKeyAndOrderFront: window self)))
     2794    doc))
    27962795
    27972796(defun hi::revert-document (doc)
Note: See TracChangeset for help on using the changeset viewer.