diff options
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" |