Commit c4cb00d0 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(hack-local-variables): If there is no PREFIX, set it to "^".

Redundant variable PREFIXLEN removed.
parent de653a63
2004-12-29 Milan Zamazal <pdm@zamazal.org>
* files.el (hack-local-variables): If no PREFIX, set it to "^".
Redundant variable PREFIXLEN removed.
2004-12-28 Matt Hodges <MPHodges@member.fsf.org>
* eshell/em-hist.el (eshell-previous-matching-input):
Start the deletion from the end of the output.
2004-12-29 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
 
* term/mac-win.el: Require x-dnd.
......
......@@ -2183,7 +2183,7 @@ is specified, returning t if it is specified."
buffer-file-name)
(concat "buffer "
(buffer-name))))))))))
(let (prefix prefixlen suffix beg
(let (prefix suffix beg
(enable-local-eval enable-local-eval))
;; The prefix is what comes before "local variables:" in its line.
;; The suffix is what comes after "local variables:" in its line.
......@@ -2197,8 +2197,7 @@ is specified, returning t if it is specified."
(buffer-substring (point)
(progn (beginning-of-line) (point)))))
(if prefix (setq prefixlen (length prefix)
prefix (regexp-quote prefix)))
(setq prefix (if prefix (regexp-quote prefix) "^"))
(if suffix (setq suffix (concat (regexp-quote suffix) "$")))
(forward-line 1)
(let ((startpos (point))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment