Mercurial > hg > xemacs-beta
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 |