From: Artur Malabarba Date: Sun, 13 Sep 2015 10:28:45 +0000 (+0100) Subject: Merge commit 'ea3958f45cb468be0f11e95c24d09e10a389fee0' X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/ad82b992bbbd8ae5eb4c4352939704929f56cdc8?hp=-c Merge commit 'ea3958f45cb468be0f11e95c24d09e10a389fee0' --- ad82b992bbbd8ae5eb4c4352939704929f56cdc8 diff --combined packages/nameless/README.org index 75f8835d1,367ffedae..367ffedae --- a/packages/nameless/README.org +++ b/packages/nameless/README.org @@@ -22,13 -22,13 +22,13 @@@ You can configure a string to use inste You can even just hide the prefix completely by setting this variable to an empty string. - While the mode is active, the C-c C-- key inserts the + While the mode is active, the =C-c C--= key inserts the package namespace if appropriate. * Configuration ** Quickly typing the namespace - ~nameless-mode~ binds the C-c C-- key to + ~nameless-mode~ binds the =C-c C--= key to ~nameless-insert-name~, which immediately inserts the current name for you, or even expands aliases to the names they point to. @@@ -39,7 -39,7 +39,7 @@@ fl C-c C-- → font-lock #+END_SRC There’s also a command called ~nameless-insert-name-or-self-insert~. - You can bind this to the _ key and make it even faster to + You can bind this to the =_= key and make it even faster to insert the name. ** Configuring the namespace name Nameless guesses the package name with the ~lm-get-package-name~ @@@ -75,7 -75,7 +75,7 @@@ as a file-local variable ;; nameless-aliases: (("c" . "cider")) ;; End: #+END_SRC - /Note that there’s no ~quote~ before ~((c~!/\\ + Note that there’s no ~quote~ before ~((c~!\\ You can also configure it for a whole project, by setting it as a dir-local variable. ** Indentation and paragraph filling diff --combined packages/nameless/nameless.el index a0d517738,f7b47efd8..f7b47efd8 --- a/packages/nameless/nameless.el +++ b/packages/nameless/nameless.el @@@ -4,7 -4,7 +4,7 @@@ ;; Author: Artur Malabarba ;; Keywords: convenience, lisp - ;; Version: 0.4 + ;; Version: 0.4.1 ;; Package-Requires: ((emacs "24.4")) ;; This program is free software; you can redistribute it and/or modify @@@ -227,7 -227,7 +227,7 @@@ Return S. (ignore-errors (string-match "\\.el\\'" (lm-get-package-name)))) (progn (unless nameless-current-name - (setq nameless-current-name (replace-regexp-in-string "\\.[^.]*\\'" "" (lm-get-package-name)))) + (setq nameless-current-name (replace-regexp-in-string "\\(-mode\\)?\\.[^.]*\\'" "" (lm-get-package-name)))) (add-function :filter-return (local 'filter-buffer-substring-function) #'nameless--filter-string) (apply #'nameless--add-keywords