/[mcclim]/mcclim/frames.lisp
ViewVC logotype

Diff of /mcclim/frames.lisp

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

revision 1.135 by crhodes, Wed Jan 28 19:27:22 2009 UTC revision 1.136 by crhodes, Sat Feb 28 16:49:40 2009 UTC
# Line 533  documentation produced by presentations. Line 533  documentation produced by presentations.
533             (table (frame-command-table frame)))             (table (frame-command-table frame)))
534         (unless (listp command)         (unless (listp command)
535           (setq command (partial-command-from-name command table)))           (setq command (partial-command-from-name command table)))
536         (if (and (typep stream 'interactor-pane)         (if (partial-command-p command)
537                  (partial-command-p command))             (funcall *partial-command-parser* table stream command 0)
            (command-line-read-remaining-arguments-for-partial-command  
             table stream command 0)  
538             command)))))             command)))))
539    
540  (defmethod read-frame-command ((frame application-frame)  (defmethod read-frame-command ((frame application-frame)

Legend:
Removed from v.1.135  
changed lines
  Added in v.1.136

  ViewVC Help
Powered by ViewVC 1.1.5