[Emacs-diffs] Changes to emacs/lisp/help-fns.el,v

[Adrian Robert]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Adrian Robert <arobert> 08/07/28 13:19:10

Index: help-fns.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/help-fns.el,v
retrieving revision 1.122
retrieving revision 1.123
diff -u -b -r1.122 -r1.123
--- help-fns.el 6 Jun 2008 20:02:42 -0000       1.122
+++ help-fns.el 28 Jul 2008 13:19:09 -0000      1.123
@@ -149,9 +149,11 @@
                          (if (member file build-files)
                              (throw 'loop file)
                            (goto-char pnt))))))))
+       (if (string-match "^ns.*\\(\\.o\\|obj\\)\\'" file)
+           (setq file (replace-match ".m" t t file 1))
        (if (string-match "\\.\\(o\\|obj\\)\\'" file)
-           (setq file (replace-match ".c" t t file)))
-       (if (string-match "\\.c\\'" file)
+             (setq file (replace-match ".c" t t file))))
+       (if (string-match "\\.\\(c\\|m\\)\\'" file)
            (concat "src/" file)
          file)))))