# HG changeset patch # User Chong Yidong # Date 1260764220 0 # Node ID a54ddff7ac90d3d0a188c368484425b389ed2bd2 # Parent c59fc4a754cc36a0a67ed050dddb0abf70150081 * 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. diff -r c59fc4a754cc -r a54ddff7ac90 lisp/ChangeLog --- a/lisp/ChangeLog Mon Dec 14 04:11:43 2009 +0000 +++ b/lisp/ChangeLog Mon Dec 14 04:17:00 2009 +0000 @@ -1,3 +1,11 @@ +2009-12-14 Chong Yidong + + * 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 * mail/emacsbug.el (message-sort-headers): Define for compiler. diff -r c59fc4a754cc -r a54ddff7ac90 lisp/cedet/semantic/db.el --- a/lisp/cedet/semantic/db.el Mon Dec 14 04:11:43 2009 +0000 +++ b/lisp/cedet/semantic/db.el Mon Dec 14 04:17:00 2009 +0000 @@ -450,7 +450,8 @@ "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 @@ "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) diff -r c59fc4a754cc -r a54ddff7ac90 lisp/cedet/semantic/mru-bookmark.el --- a/lisp/cedet/semantic/mru-bookmark.el Mon Dec 14 04:11:43 2009 +0000 +++ b/lisp/cedet/semantic/mru-bookmark.el Mon Dec 14 04:17:00 2009 +0000 @@ -240,9 +240,9 @@ ;; 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 @@ (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}