[Emacs-diffs] emacs-24 r117375: * etags.c (Lisp_functions): Also record cl-defun etc.

[Paul Eggert]

------------------------------------------------------------
revno: 117375
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/17965
committer: Paul Eggert <address@hidden>
branch nick: emacs-24
timestamp: Sat 2014-07-12 09:26:54 -0700
message:
  * etags.c (Lisp_functions): Also record cl-defun etc.
modified:
  lib-src/ChangeLog              changelog-20091113204419-o5vbwnq5f7feedwu-1608
  lib-src/etags.c                etags.c-20091113204419-o5vbwnq5f7feedwu-216

=== modified file 'lib-src/ChangeLog'
--- a/lib-src/ChangeLog 2014-05-20 07:59:28 +0000
+++ b/lib-src/ChangeLog 2014-07-12 16:26:54 +0000
@@ -1,3 +1,7 @@
+2014-07-12  Paul Eggert  <address@hidden>
+
+       * etags.c (Lisp_functions): Also record cl-defun etc. (Bug#17965)
+
 2014-05-20  Paul Eggert  <address@hidden>
 
        Fix rcs2log problems with CVS.

=== modified file 'lib-src/etags.c'
--- a/lib-src/etags.c   2014-01-01 07:43:34 +0000
+++ b/lib-src/etags.c   2014-07-12 16:26:54 +0000
@@ -4747,6 +4747,9 @@
            }
        }
 
+      if (strneq (dbp + 1, "cl-", 3) || strneq (dbp + 1, "CL-", 3))
+       dbp += 3;
+
       if (strneq (dbp+1, "def", 3) || strneq (dbp+1, "DEF", 3))
        {
          dbp = skip_non_spaces (dbp);