Mercurial > emacs

comparison lisp/mail/mailalias.el @ 90185:5b029ff3b08d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-55 Merge from emacs--cvs-trunk--0 Patches applied: * emacs--cvs-trunk--0 (patch 320-323) - Update from CVS
author Miles Bader <miles@gnu.org>
date Thu, 26 May 2005 05:42:19 +0000
parents f042e7c0fe20 564274a2eaa2
children f9a65d7ebd29
comparison
equal deleted inserted replaced
90184:9e5e2f01c7ab 90185:5b029ff3b08d
433 (insert-file-contents (car files) nil nil nil t) 433 (insert-file-contents (car files) nil nil nil t)
434 (setq files (cdr files)))) 434 (setq files (cdr files))))
435 (if mail-passwd-command 435 (if mail-passwd-command
436 (call-process shell-file-name nil t nil 436 (call-process shell-file-name nil t nil
437 shell-command-switch mail-passwd-command)) 437 shell-command-switch mail-passwd-command))
438 (beginning-of-buffer) 438 (goto-char (point-min))
439 (setq mail-local-names nil) 439 (setq mail-local-names nil)
440 (while (not (eobp)) 440 (while (not (eobp))
441 ;;Recognize lines like 441 ;;Recognize lines like
442 ;; nobody:*:65534:65534::/: 442 ;; nobody:*:65534:65534::/:
443 ;; +demo::::::/bin/csh 443 ;; +demo::::::/bin/csh