Mercurial > emacs

comparison lisp/files.el @ 5621:cb56cce6e377

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix typo (extra paren).
author Roland McGrath <roland@gnu.org>
date Mon, 17 Jan 1994 05:24:29 +0000
parents 777597fbd048
children 76f618230217
comparison
equal deleted inserted replaced
5620:aa58f9998047 5621:cb56cce6e377
1 ;;; files.el --- file input and output commands for Emacs 1 ;;; files.el --- file input and output commands for Emacs
2 2
3 ;; Copyright (C) 1985, 1986, 1987, 1992, 1993 Free Software Foundation, Inc. 3 ;; Copyright (C) 1985, 86, 87, 92, 93, 94 Free Software Foundation, Inc.
4 4
5 ;; Maintainer: FSF 5 ;; Maintainer: FSF
6 6
7 ;; This file is part of GNU Emacs. 7 ;; This file is part of GNU Emacs.
8 8
923 name (substring name 0 (match-beginning 0)) 923 name (substring name 0 (match-beginning 0))
924 keep-going t)) 924 keep-going t))
925 (setq mode (cdr (car alist)) 925 (setq mode (cdr (car alist))
926 keep-going nil))) 926 keep-going nil)))
927 (setq alist (cdr alist))) 927 (setq alist (cdr alist)))
928 (if mode (funcall mode)))))))))) 928 (if mode (funcall mode)))))))))
929 929
930 (defun hack-local-variables-prop-line () 930 (defun hack-local-variables-prop-line ()
931 ;; Set local variables specified in the -*- line. 931 ;; Set local variables specified in the -*- line.
932 ;; Ignore any specification for `mode:'; 932 ;; Ignore any specification for `mode:';
933 ;; set-auto-mode should already have handled that. 933 ;; set-auto-mode should already have handled that.