]> code.delx.au - gnu-emacs/blobdiff - lisp/cedet/semantic/db-debug.el
Update copyright year to 2014 by running admin/update-copyright.
[gnu-emacs] / lisp / cedet / semantic / db-debug.el
index 52ae605f6a0b1ca7227ba434234e85b8b71a9f94..9f1b6f9bd6f32331b2b38ae405d90578b16d75d4 100644 (file)
@@ -1,6 +1,6 @@
 ;;; semantic/db-debug.el --- Extra level debugging routines for Semantic
 
-;;; Copyright (C) 2008, 2009 Free Software Foundation, Inc.
+;;; Copyright (C) 2008-2014 Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <eric@siege-engine.com>
 
@@ -26,7 +26,6 @@
 
 (require 'data-debug)
 (require 'semantic/db)
-(require 'semantic/db-mode)
 (require 'semantic/format)
 
 ;;; Code:
@@ -89,8 +88,7 @@
   (let* ((full-filename (semanticdb-full-filename table))
         (buff (find-buffer-visiting full-filename)))
     (if buff
-       (save-excursion
-         (set-buffer buff)
+       (with-current-buffer buff
          (semantic-sanity-check))
       ;; We can't use the usual semantic validity check, so hack our own.
       (semanticdb-table-oob-sanity-check (semanticdb-get-tags table)))))