]> code.delx.au - gnu-emacs/blobdiff - lisp/cedet/semantic/db-debug.el
* cedet/srecode/srt-mode.el (semantic-analyze-possible-completions):
[gnu-emacs] / lisp / cedet / semantic / db-debug.el
index 619dd601186704bdbb321866101a01a4b3a96378..40b311ca285862f7df4b566eb1bc806d181de34b 100644 (file)
@@ -88,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)))))