procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* cedet/semantic/mru-bookmark.el (global-semantic-mru-bookmark-mode)

Browse source 
(semantic-mru-bookmark-mode): Doc fixes.

* cedet/semantic/db.el (semanticdb-cache-get): Use error instead
of assert.
This commit is contained in:
Chong Yidong 2009-12-14 04:17:00 +00:00
parent 8e6874337f
commit f192624c76
3 changed files with 17 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/ChangeLog
View file

@ -1,3 +1,11 @@
2009-12-14 Chong Yidong <cyd@stupidchicken.com>
* cedet/semantic/mru-bookmark.el (global-semantic-mru-bookmark-mode)
(semantic-mru-bookmark-mode): Doc fixes.
* cedet/semantic/db.el (semanticdb-cache-get): Use error instead
of assert.
2009-12-13 Glenn Morris <rgm@gnu.org>
* mail/emacsbug.el (message-sort-headers): Define for compiler.

6
lisp/cedet/semantic/db.el
View file

@ -450,7 +450,8 @@ See the file semantic-scope.el for an example."
"Get a cache object on TABLE of class DESIRED-CLASS.
This method will create one if none exists with no init arguments
other than :table."
(assert (child-of-class-p desired-class 'semanticdb-abstract-cache))
(unless (child-of-class-p desired-class 'semanticdb-abstract-cache)
(error "Invalid SemanticDB cache"))
(let ((cache (oref table cache))
(obj nil))
(while (and (not obj) cache)
@ -500,7 +501,8 @@ See the file semantic-scope.el for an example."
"Get a cache object on DB of class DESIRED-CLASS.
This method will create one if none exists with no init arguments
other than :table."
(assert (child-of-class-p desired-class 'semanticdb-abstract-db-cache))
(unless (child-of-class-p desired-class 'semanticdb-abstract-cache)
(error "Invalid SemanticDB cache"))
(let ((cache (oref db cache))
(obj nil))
(while (and (not obj) cache)

10
lisp/cedet/semantic/mru-bookmark.el
View file

@ -240,9 +240,9 @@ This function pushes tags onto the tag ring."
;; Tracking minor mode.
(defcustom global-semantic-mru-bookmark-mode nil
"*If non-nil enable global use of variable `semantic-mru-bookmark-mode'.
When this mode is enabled, changes made to a buffer are highlighted
until the buffer is reparsed."
"If non-nil, enable `semantic-mru-bookmark-mode' globally.
When this mode is enabled, Emacs keeps track of which tags have
been edited, and you can re-visit them with \\[semantic-mrub-switch-tags]."
:group 'semantic
:group 'semantic-modes
:type 'boolean
@ -306,8 +306,8 @@ minor mode is enabled."
(defun semantic-mru-bookmark-mode (&optional arg)
"Minor mode for tracking tag-based bookmarks automatically.
Tag based bookmarks a tracked based on editing and viewing habits
and can then be navigated via the MRU bookmark keymap.
When this mode is enabled, Emacs keeps track of which tags have
been edited, and you can re-visit them with \\[semantic-mrub-switch-tags].
\\{semantic-mru-bookmark-mode-map}