/[slime]/slime/swank.lisp
ViewVC logotype

Diff of /slime/swank.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.370 by mkoeppe, Wed Mar 22 23:18:53 2006 UTC revision 1.371 by crhodes, Thu Mar 23 07:14:13 2006 UTC
# Line 2244  Return its name and the string to use in Line 2244  Return its name and the string to use in
2244  WHAT can be:  WHAT can be:
2245    A pathname or a string,    A pathname or a string,
2246    A list (PATHNAME-OR-STRING LINE [COLUMN]),    A list (PATHNAME-OR-STRING LINE [COLUMN]),
2247    A function name (symbol),    A function name (symbol or cons),
2248    NIL.    NIL.
2249    
2250  Returns true if it actually called emacs, or NIL if not."  Returns true if it actually called emacs, or NIL if not."
# Line 2256  Returns true if it actually called emacs Line 2256  Returns true if it actually called emacs
2256                   ((pathname-or-string-p what)                   ((pathname-or-string-p what)
2257                    (canonicalize-filename what))                    (canonicalize-filename what))
2258                   ((symbolp what) what)                   ((symbolp what) what)
2259                     ((consp what) what)
2260                   (t (return-from ed-in-emacs nil)))))                   (t (return-from ed-in-emacs nil)))))
2261        (send-oob-to-emacs `(:ed ,target))        (cond
2262        t)))          (*emacs-connection* (send-oob-to-emacs `(:ed ,target)))
2263            ((default-connection)
2264             (with-connection ((default-connection))
2265               (send-oob-to-emacs `(:ed ,target))))
2266            (t nil)))))
2267    
2268  (defslimefun value-for-editing (form)  (defslimefun value-for-editing (form)
2269    "Return a readable value of FORM for editing in Emacs.    "Return a readable value of FORM for editing in Emacs.

Legend:
Removed from v.1.370  
changed lines
  Added in v.1.371

  ViewVC Help
Powered by ViewVC 1.1.5