[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/simple.el
From: |
Richard M. Stallman |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/simple.el |
Date: |
Sat, 27 Apr 2002 19:16:18 -0400 |
Index: emacs/lisp/simple.el
diff -c emacs/lisp/simple.el:1.538 emacs/lisp/simple.el:1.539
*** emacs/lisp/simple.el:1.538 Mon Apr 22 18:35:46 2002
--- emacs/lisp/simple.el Sat Apr 27 19:16:18 2002
***************
*** 41,46 ****
--- 41,67 ----
"Highlight (un)matching of parens and expressions."
:group 'matching)
+ (define-key global-map [?\C-x right] 'next-buffer)
+ (define-key global-map [?\C-x left] 'prev-buffer)
+ (defun next-buffer ()
+ "Switch to the next buffer in cyclic order."
+ (interactive)
+ (let ((buffer (current-buffer)))
+ (switch-to-buffer (other-buffer buffer))
+ (bury-buffer buffer)))
+
+ (defun prev-buffer ()
+ "Switch to the previous buffer in cyclic order."
+ (interactive)
+ (let ((list (nreverse (buffer-list)))
+ found)
+ (while (and (not found) list)
+ (let ((buffer (car list)))
+ (if (and (not (get-buffer-window buffer))
+ (not (string-match "\\` " (buffer-name buffer))))
+ (setq found buffer)))
+ (setq list (cdr list)))
+ (switch-to-buffer found)))
(defun fundamental-mode ()
"Major mode not specialized for anything in particular.
***************
*** 3974,3980 ****
(kp-decimal ?.)
(kp-divide ?/)
(kp-equal ?=)))
!
;;;;
;;;; forking a twin copy of a buffer.
;;;;
--- 3995,4001 ----
(kp-decimal ?.)
(kp-divide ?/)
(kp-equal ?=)))
!
;;;;
;;;; forking a twin copy of a buffer.
;;;;
***************
*** 4124,4131 ****
(clone-indirect-buffer nil t norecord)))
(define-key ctl-x-4-map "c" 'clone-indirect-buffer-other-window)
!
!
;;; Handling of Backspace and Delete keys.
(defcustom normal-erase-is-backspace nil
--- 4145,4151 ----
(clone-indirect-buffer nil t norecord)))
(define-key ctl-x-4-map "c" 'clone-indirect-buffer-other-window)
!
;;; Handling of Backspace and Delete keys.
(defcustom normal-erase-is-backspace nil
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Pavel Janík, 2002/04/05
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Pavel Janík, 2002/04/07
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Stefan Monnier, 2002/04/11
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Kim F. Storm, 2002/04/14
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Kim F. Storm, 2002/04/18
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Richard M. Stallman, 2002/04/18
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Richard M. Stallman, 2002/04/22
- [Emacs-diffs] Changes to emacs/lisp/simple.el,
Richard M. Stallman <=
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Kim F. Storm, 2002/04/29