Thank you - committed. Please check, does it work? I don't have dev version of ctags


On Mon, Oct 14, 2013 at 3:00 PM, Maxym Dmytrychenko <maxim.d33@gmail.com> wrote:
sorry, an obvious typo, now should be better:
=== modified file 'lisp/cedet/semantic/ectags/util.el'
--- lisp/cedet/semantic/ectags/util.el  2013-07-28 11:24:40 +0000
+++ lisp/cedet/semantic/ectags/util.el  2013-10-14 12:58:24 +0000
@@ -137,7 +137,7 @@
          nil)
       (setq str (with-current-buffer b
                  (goto-char (point-min))
-                 (if (re-search-forward "Exuberant Ctags \\([0-9.]+\\)\\(~svn[0-9]+\\)?," nil t)
+                 (if (re-search-forward "Exuberant Ctags \\(\\([0-9.]+\\)\\(~svn[0-9]+\\)?\\|Development\\)," nil t)
                      (match-string 1)
                    nil)
                  )
@@ -177,7 +177,7 @@
     (require 'inversion)
     (when (not v)
       (error "Exuberant CTags not found.  Use M-x semantic-ectags-version RET"))
-    (when (inversion-check-version v nil semantic-ectags-min-version)
+    (when (and (inversion-check-version v nil semantic-ectags-min-version) (not (equal v "Development")))
       (error "Version of CTags is %s.  Need at least %s"
             v semantic-ectags-min-version))
     (when (not r)


regards
Max


On Mon, Oct 14, 2013 at 1:10 PM, Maxym Dmytrychenko <maxim.d33@gmail.com> wrote:
Hi to all

(thanks Alex!)

including usage like
;; enable ctags for some languages:
;;  Unix Shell, Perl, Pascal, Tcl, Fortran, Asm
(when (cedet-ectag-version-check)
  (semantic-load-enable-primary-exuberent-ctags-support))

however, svn version of Exuberant Ctags for --version gives like:

ctags --version

Exuberant Ctags Development, Copyright (C) 1996-2009 Darren Hiebert

  Compiled: Oct  6 2013, 15:18:46

  Addresses: <dhiebert@users.sourceforge.net>, http://ctags.sourceforge.net

  Optional compiled features: +wildcards, +regex


which cannot be parsed nicely by semantic-ectags-version,

below is the patch , which hopefully should help:

=== modified file 'lisp/cedet/semantic/ectags/util.el'

--- lisp/cedet/semantic/ectags/util.el  2013-07-28 11:24:40 +0000

+++ lisp/cedet/semantic/ectags/util.el  2013-10-14 11:03:19 +0000

@@ -137,7 +137,7 @@

          nil)

       (setq str (with-current-buffer b

                  (goto-char (point-min))

-                 (if (re-search-forward "Exuberant Ctags \\([0-9.]+\\)\\(~svn[0-9]+\\)?," nil t)

+                 (if (re-search-forward "Exuberant Ctags \\(\\([0-9.]+\\)\\(~svn[0-9]+\\)?\\|Development\\)," nil t)

                      (match-string 1)

                    nil)

                  )

@@ -177,6 +177,8 @@

     (require 'inversion)

     (when (not v)

       (error "Exuberant CTags not found.  Use M-x semantic-ectags-version RET"))

+    (when (equal v "Development")

+     't)

     (when (inversion-check-version v nil semantic-ectags-min-version)

       (error "Version of CTags is %s.  Need at least %s"

             v semantic-ectags-min-version))


PS and Disclaimer: not a big Lisp developer :) but it looks to work....


regards

Max






------------------------------------------------------------------------------
October Webinars: Code for Performance
Free Intel webinars can help you accelerate application performance.
Explore tips for MPI, OpenMP, advanced profiling, and more. Get the most from
the latest Intel processors and coprocessors. See abstracts and register >
http://pubads.g.doubleclick.net/gampad/clk?id=60135031&iu=/4140/ostg.clktrk
_______________________________________________
Cedet-devel mailing list
Cedet-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/cedet-devel




--
With best wishes,                    Alex Ott
http://alexott.net/
Twitter: alexott_en (English), alexott (Russian)
Skype: alex.ott