mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

allow :mode and :interpreter to accept a string

Browse source 
Fixes https://github.com/jwiegley/use-package/issues/72.
This commit is contained in:
Adam Spiers 2013-12-16 12:16:56 +00:00
parent 7de292c0e9
commit 75206228dd
1 changed files with 15 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

20
lisp/use-package/use-package.el
View file

@ -78,10 +78,16 @@
;;
;; Similar to `:bind', you can use `:mode' and `:interpreter' to establish a
;; deferred binding within `auto-mode-alist' and `interpreter-mode-alist'.
;; The specifier to either keyword can be a single cons or a list:
;; The specifier to either keyword can be a single cons, or a list, or just
;; a string:
;;
;; (use-package python-mode
;; :mode ("\\.py$" . python-mode)
;; (use-package ruby-mode
;; :mode "\\.rb\\'"
;; :interpreter "ruby")
;;
;; ;; The package is "python" but the mode is "python-mode":
;; (use-package python
;; :mode ("\\.py\\'" . python-mode)
;; :interpreter ("python" . python-mode))
;;
;; If you aren't using `:commands', `:bind', `:mode', or `:interpreter' (all
@ -421,8 +427,12 @@ For full documentation. please see commentary.
(defines (plist-get-value args :defines))
(idle-body (plist-get args :idle))
(keybindings-alist (plist-get-value args :bind))
(mode-alist (plist-get-value args :mode))
(interpreter-alist (plist-get-value args :interpreter))
(mode (plist-get-value args :mode))
(mode-alist
(if (stringp mode) (cons mode name) mode))
(interpreter (plist-get-value args :interpreter))
(interpreter-alist
(if (stringp interpreter) (cons interpreter name) interpreter))
(predicate (plist-get args :if))
(pkg-load-path (plist-get-value args :load-path))
(defines-eval (if (null defines)