summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorAdrian Robert <Adrian.B.Robert@gmail.com>2008-07-28 13:19:10 +0000
committerAdrian Robert <Adrian.B.Robert@gmail.com>2008-07-28 13:19:10 +0000
commit14f798ff7e357b537ff47f65041588a153530621 (patch)
tree4d46cf6c4a79a5103612d91884b7172d3aa124f6 /lisp/emacs-lisp
parentddaa36e16efa267f40158baca709a58d2d748743 (diff)
downloademacs-14f798ff7e357b537ff47f65041588a153530621.tar.gz
emacs-14f798ff7e357b537ff47f65041588a153530621.tar.bz2
emacs-14f798ff7e357b537ff47f65041588a153530621.zip
apply patch from Seiji Zenitani to find doc strings in ns*.m files
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/find-func.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el
index efae0d1cdc8..015e75723dd 100644
--- a/lisp/emacs-lisp/find-func.el
+++ b/lisp/emacs-lisp/find-func.el
@@ -239,7 +239,7 @@ The search is done in the source for library LIBRARY."
;; that defines something else.
(while (and (symbolp symbol) (get symbol 'definition-name))
(setq symbol (get symbol 'definition-name)))
- (if (string-match "\\`src/\\(.*\\.c\\)\\'" library)
+ (if (string-match "\\`src/\\(.*\\.\\(c\\|m\\)\\)\\'" library)
(find-function-C-source symbol (match-string 1 library) type)
(when (string-match "\\.el\\(c\\)\\'" library)
(setq library (substring library 0 (match-beginning 1))))