diff options
| author | Glenn Morris <rgm@gnu.org> | 2013-05-11 16:54:14 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2013-05-11 16:54:14 -0700 |
| commit | 3191b52fa869eeb664e3c3c11c1a21a1f1127782 (patch) | |
| tree | 6d97667d699dbe8ecaaebc5bb11687867d943a4a /lisp/cus-dep.el | |
| parent | e065ba740b33323a25b21be5738f6a7f1fa89a3f (diff) | |
| download | emacs-3191b52fa869eeb664e3c3c11c1a21a1f1127782.tar.gz | |
* cus-dep.el (custom-make-dependencies): Only use safe local variables.
Treat cc-provide like provide.
Diffstat (limited to 'lisp/cus-dep.el')
| -rw-r--r-- | lisp/cus-dep.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/cus-dep.el b/lisp/cus-dep.el index 099998bf989..79698cc4b4a 100644 --- a/lisp/cus-dep.el +++ b/lisp/cus-dep.el @@ -42,6 +42,7 @@ ldefs-boot\\|cus-load\\|finder-inf\\|esh-groups\\|subdirs\\)\\.el$\\)" "Batch function to extract custom dependencies from .el files. Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS" (let ((enable-local-eval nil) + (enable-local-variables :safe) subdir) (with-temp-buffer ;; Use up command-line-args-left else Emacs can try to open @@ -70,7 +71,7 @@ Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS" (load-file-name file)) (if (save-excursion (re-search-forward - (concat "(provide[ \t\n]+\\('\\|(quote[ \t\n]\\)[ \t\n]*" + (concat "(\\(cc-\\)?provide[ \t\n]+\\('\\|(quote[ \t\n]\\)[ \t\n]*" (regexp-quote name) "[ \t\n)]") nil t)) (setq name (intern name))) |