]> code.delx.au - gnu-emacs/blobdiff - lisp/cedet/cedet-idutils.el
Use use-region-p in prolog.el
[gnu-emacs] / lisp / cedet / cedet-idutils.el
index b35035a58b62e1fb37021315c4aeea5602c92f30..ee2061b601564a680efb9b632d10944c205e4b05 100644 (file)
@@ -1,9 +1,9 @@
 ;;; cedet-idutils.el --- ID Utils support for CEDET.
 
-;; Copyright (C) 2009-201 Free Software Foundation, Inc.
+;; Copyright (C) 2009-2016 Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <eric@siege-engine.com>
-;; Version: 0.2
+;; Old-Version: 0.2
 ;; Keywords: OO, lisp
 ;; Package: cedet
 
@@ -179,8 +179,9 @@ return nil."
          nil)
       (with-current-buffer b
        (goto-char (point-min))
-       (re-search-forward "fnid - \\([0-9.]+\\)" nil t)
-       (setq rev (match-string 1))
+       (if (re-search-forward "fnid - \\([0-9.]+\\)" nil t)
+           (setq rev (match-string 1))
+         (setq rev "0"))
        (if (inversion-check-version rev nil cedet-idutils-min-version)
            (if noerror
                nil