diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-07-05 11:31:22 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-07-05 11:31:22 -0400 |
| commit | 2dcdbdd97db0f414a2f11421e9d8001ea6178517 (patch) | |
| tree | be3264dba0659172179eaf2b03a163e4555c9982 /lisp/bs.el | |
| parent | 73fed7aeda408ab0e9d67ca3c44a4c7711e5b490 (diff) | |
| download | emacs-2dcdbdd97db0f414a2f11421e9d8001ea6178517.tar.gz | |
Fix some uses of switch-to-buffer.
* lisp/progmodes/compile.el (compilation-goto-locus):
* lisp/net/tramp-cmds.el (tramp-append-tramp-buffers):
* lisp/bs.el (bs-cycle-next, bs-cycle-previous):
* lisp/bookmark.el (bookmark-bmenu-list, bookmark-bmenu-2-window):
* lisp/bindings.el (mode-line-other-buffer):
* lisp/autoinsert.el (auto-insert):
* lisp/arc-mode.el (archive-extract):
* lisp/abbrev.el (edit-abbrevs): Fix some uses of switch-to-buffer.
Diffstat (limited to 'lisp/bs.el')
| -rw-r--r-- | lisp/bs.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/bs.el b/lisp/bs.el index 94fbd0e04f9..c7326eedd26 100644 --- a/lisp/bs.el +++ b/lisp/bs.el @@ -1215,7 +1215,8 @@ by buffer configuration `bs-cycle-configuration-name'." ;; We don't want the frame iconified if the only window in the frame ;; happens to be dedicated. (bury-buffer (current-buffer)) - (switch-to-buffer next) + (with-no-warnings ; We really do want to call `switch-to-buffer' here. + (switch-to-buffer next)) (setq bs--cycle-list (append (cdr cycle-list) (list (car cycle-list)))) (bs-message-without-log "Next buffers: %s" @@ -1244,7 +1245,8 @@ by buffer configuration `bs-cycle-configuration-name'." bs--cycle-list))) (prev-buffer (car tupel)) (cycle-list (cdr tupel))) - (switch-to-buffer prev-buffer) + (with-no-warnings ; We really do want to call `switch-to-buffer' here. + (switch-to-buffer prev-buffer)) (setq bs--cycle-list (append (last cycle-list) (reverse (cdr (reverse cycle-list))))) (bs-message-without-log "Previous buffers: %s" |