mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

Fix package.el handling of local variables on first line.

Browse Source 
* lisp/emacs-lisp/package.el (package-buffer-info): Avoid putting
local variables into description.
This commit is contained in:
Chong Yidong 2012-05-05 13:13:27 +08:00
parent 3d53ee1b2d
commit f677562b6c
2 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2012-05-05 Chong Yidong <cyd@gnu.org>
* emacs-lisp/package.el (package-buffer-info): Avoid putting local
variables into description.
2012-05-05 Stefan Monnier <monnier@iro.umontreal.ca>
* shell.el (shell-completion-vars): Set pcomplete-arg-quote-list like

2
lisp/emacs-lisp/package.el
View File

@ -943,7 +943,7 @@ If the buffer does not contain a conforming package, signal an
error. If there is a package, narrow the buffer to the file's
boundaries."
(goto-char (point-min))
(unless (re-search-forward "^;;; \\([^ ]*\\)\\.el --- \\(.*\\)$" nil t)
(unless (re-search-forward "^;;; \\([^ ]*\\)\\.el ---[ \t]*\\(.*?\\)[ \t]*\\(-\\*-.*-\\*-[ \t]*\\)?$" nil t)
(error "Packages lacks a file header"))
(let ((file-name (match-string-no-properties 1))
(desc (match-string-no-properties 2))