X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/be54382cca73c2a64f3bd2720a2332649541bbd5..ad82b992bbbd8ae5eb4c4352939704929f56cdc8:/packages/nameless/nameless.el

diff --git a/packages/nameless/nameless.el b/packages/nameless/nameless.el
index a0d517738..f7b47efd8 100644
--- a/packages/nameless/nameless.el
+++ b/packages/nameless/nameless.el
@@ -4,7 +4,7 @@
 
 ;; Author: Artur Malabarba <emacs@endlessparentheses.com>
 ;; 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 @@ 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