comparison lisp/winnt.el @ 288:e11d67e05968 r21-0b42

Import from CVS: tag r21-0b42
author cvs
date Mon, 13 Aug 2007 10:35:54 +0200
parents 57709be46d1b
children 182f72e8cd0d
comparison
equal deleted inserted replaced
287:13a0bd77a29d 288:e11d67e05968
130 (null return-me)) 130 (null return-me))
131 (setq assoc (pop alist)) 131 (setq assoc (pop alist))
132 (if (string-match (car assoc) fname) 132 (if (string-match (car assoc) fname)
133 (setq return-me (funcall (cdr assoc) (cdr args))))) 133 (setq return-me (funcall (cdr assoc) (cdr args)))))
134 (or return-me 134 (or return-me
135 (nt-quote-args-verbatim args)))) 135 (nt-quote-args-verbatim (cdr args)))))
136 136
137 ;;; winnt.el ends here 137 ;;; winnt.el ends here