diff options
author | Adrian Robert <Adrian.B.Robert@gmail.com> | 2008-07-28 13:19:10 +0000 |
---|---|---|
committer | Adrian Robert <Adrian.B.Robert@gmail.com> | 2008-07-28 13:19:10 +0000 |
commit | 14f798ff7e357b537ff47f65041588a153530621 (patch) | |
tree | 4d46cf6c4a79a5103612d91884b7172d3aa124f6 /lisp/emacs-lisp | |
parent | ddaa36e16efa267f40158baca709a58d2d748743 (diff) | |
download | emacs-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.el | 2 |
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)))) |