]> code.delx.au - gnu-emacs/blobdiff - lisp/cedet/cedet-idutils.el
Update copyright year to 2015
[gnu-emacs] / lisp / cedet / cedet-idutils.el
index b35035a58b62e1fb37021315c4aeea5602c92f30..65af51c26b02c5174b736c57235bb1086858a3f4 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-2015 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