/[climacs]/climacs/climacs.lisp
ViewVC logotype

Diff of /climacs/climacs.lisp

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

revision 1.5 by thenriksen, Wed Jan 23 18:17:05 2008 UTC revision 1.6 by thenriksen, Sat Jan 26 11:28:53 2008 UTC
# Line 77  can be a filename (edit the file) or sym Line 77  can be a filename (edit the file) or sym
77             (t (error 'type-error :datum thing             (t (error 'type-error :datum thing
78                       :expected-type '(or null string pathname symbol))))))                       :expected-type '(or null string pathname symbol))))))
79      (if climacs-frame      (if climacs-frame
80          (execute-frame-command climacs-frame command)          (when command
81              (execute-frame-command climacs-frame command))
82          (apply #'climacs-common command :new-process t args)))          (apply #'climacs-common command :new-process t args)))
83    t)    t)
84    

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

  ViewVC Help
Powered by ViewVC 1.1.5