/[cmucl]/src/hemlock/unixcoms.lisp
ViewVC logotype

Diff of /src/hemlock/unixcoms.lisp

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

revision 1.6 by ram, Wed Sep 4 14:24:07 1991 UTC revision 1.7 by ram, Wed Aug 25 02:11:19 1993 UTC
# Line 166  Line 166 
166                       (list* (namestring pathname)                       (list* (namestring pathname)
167                              (value scribe-utility-switches))                              (value scribe-utility-switches))
168       :output stream :error stream       :output stream :error stream
169       :wait nil       :wait nil)))
      :before-execve  
      #'(lambda ()  
          (setf (default-directory) (directory-namestring pathname))))))  
170    
171    
172    

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

  ViewVC Help
Powered by ViewVC 1.1.5