lisp/frame.el: Minor rearrangement.
This commit is contained in:
parent
60efac0fc5
commit
7a76850c20
1 changed files with 7 additions and 15 deletions
|
@ -1556,21 +1556,6 @@ left untouched. FRAME nil or omitted means use the selected frame."
|
|||
(define-obsolete-variable-alias 'delete-frame-hook
|
||||
'delete-frame-functions "22.1")
|
||||
|
||||
|
||||
;; Highlighting trailing whitespace.
|
||||
|
||||
(make-variable-buffer-local 'show-trailing-whitespace)
|
||||
|
||||
|
||||
;; Scrolling
|
||||
|
||||
(defgroup scrolling nil
|
||||
"Scrolling windows."
|
||||
:version "21.1"
|
||||
:group 'frames)
|
||||
|
||||
(defvaralias 'automatic-hscrolling 'auto-hscroll-mode)
|
||||
|
||||
|
||||
;; Blinking cursor
|
||||
|
||||
|
@ -1663,6 +1648,13 @@ terminals, cursor blinking is controlled by the terminal."
|
|||
(define-key ctl-x-5-map "0" 'delete-frame)
|
||||
(define-key ctl-x-5-map "o" 'other-frame)
|
||||
|
||||
|
||||
;; Misc.
|
||||
|
||||
(defvaralias 'automatic-hscrolling 'auto-hscroll-mode)
|
||||
|
||||
(make-variable-buffer-local 'show-trailing-whitespace)
|
||||
|
||||
(provide 'frame)
|
||||
|
||||
;;; frame.el ends here
|
||||
|
|
Loading…
Add table
Reference in a new issue