Make some more cedet version variables obsolete
* lisp/cedet/ede.el (ede-version): * lisp/cedet/semantic.el (semantic-version): * lisp/cedet/srecode.el (srecode-version): Make obsolete. * lisp/cedet/semantic/db-file.el (semanticdb-file-version): Don't use above obsolete variable semantic-version.
This commit is contained in:
parent
829b131e5b
commit
fdbdbc2e1b
4 changed files with 12 additions and 7 deletions
|
|
@ -1,6 +1,6 @@
|
|||
;;; ede.el --- Emacs Development Environment gloss -*- lexical-binding: t; -*-
|
||||
|
||||
;; Copyright (C) 1998-2005, 2007-2022 Free Software Foundation, Inc.
|
||||
;; Copyright (C) 1998-2022 Free Software Foundation, Inc.
|
||||
|
||||
;; Author: Eric M. Ludlam <zappo@gnu.org>
|
||||
;; Keywords: project, make
|
||||
|
|
@ -39,6 +39,8 @@
|
|||
;;
|
||||
;; (global-ede-mode t)
|
||||
|
||||
;;; Code:
|
||||
|
||||
(require 'cedet)
|
||||
(require 'cl-lib)
|
||||
(require 'eieio)
|
||||
|
|
@ -66,10 +68,11 @@
|
|||
|
||||
(defconst ede-version "2.0"
|
||||
"Current version of the Emacs EDE.")
|
||||
(make-obsolete-variable 'ede-version 'emacs-version "29.1")
|
||||
|
||||
;;; Code:
|
||||
(defun ede-version ()
|
||||
"Display the current running version of EDE."
|
||||
(declare (obsolete emacs-version "29.1"))
|
||||
(interactive) (message "EDE %s" ede-version))
|
||||
|
||||
(defgroup ede nil
|
||||
|
|
|
|||
|
|
@ -34,6 +34,8 @@
|
|||
;; menu). To enable it at startup, put (semantic-mode 1) in your init
|
||||
;; file.
|
||||
|
||||
;;; Code:
|
||||
|
||||
(require 'cedet)
|
||||
(require 'semantic/tag)
|
||||
(require 'semantic/lex)
|
||||
|
|
@ -41,6 +43,7 @@
|
|||
|
||||
(defvar semantic-version "2.2"
|
||||
"Current version of Semantic.")
|
||||
(make-obsolete-variable 'semantic-version 'emacs-version "29.1")
|
||||
|
||||
(declare-function inversion-test "inversion")
|
||||
(declare-function semanticdb-load-ebrowse-caches "semantic/db-ebrowse")
|
||||
|
|
@ -73,9 +76,6 @@ introduced."
|
|||
|
||||
(require 'semantic/fw)
|
||||
|
||||
;;; Code:
|
||||
;;
|
||||
|
||||
;;; Variables and Configuration
|
||||
;;
|
||||
(defvar-local semantic--parse-table nil
|
||||
|
|
|
|||
|
|
@ -29,7 +29,7 @@
|
|||
(require 'cedet-files)
|
||||
(require 'data-debug)
|
||||
|
||||
(defvar semanticdb-file-version semantic-version
|
||||
(defvar semanticdb-file-version "2.2"
|
||||
"Version of semanticdb we are writing files to disk with.")
|
||||
(defvar semanticdb-file-incompatible-version "1.4"
|
||||
"Version of semanticdb we are not reverse compatible with.")
|
||||
|
|
|
|||
|
|
@ -37,14 +37,16 @@
|
|||
;;
|
||||
;; See the srecode manual for specific details.
|
||||
|
||||
;;; Code:
|
||||
|
||||
(require 'eieio)
|
||||
(require 'mode-local)
|
||||
(load "srecode/loaddefs" nil 'nomessage)
|
||||
|
||||
(defvar srecode-version "1.2"
|
||||
"Current version of the Semantic Recoder.")
|
||||
(make-obsolete-variable 'srecode-version 'emacs-version "29.1")
|
||||
|
||||
;;; Code:
|
||||
(defgroup srecode nil
|
||||
"Semantic Recoder."
|
||||
:group 'extensions
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue