mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

(split-window-preferred-function): Add custom info.

Browse Source
This commit is contained in:
Stefan Monnier 2007-09-07 03:32:35 +00:00
parent 90ab5c624d
commit c8f1ea764e
2 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/ChangeLog
View File

@ -1,5 +1,7 @@
2007-09-07 Stefan Monnier <monnier@iro.umontreal.ca>
* cus-start.el (split-window-preferred-function): Add custom info.
* calendar/holidays.el (holiday-list, calendar-check-holidays)
(calendar-mark-holidays, calendar-list-holidays)
(holiday-filter-visible-calendar): New names to clean up namespace.

11
lisp/cus-start.el
View File

@ -342,6 +342,15 @@ since it could result in memory overflow and make Emacs crash."
(even-window-heights windows boolean)
(next-screen-context-lines windows integer)
(split-height-threshold windows integer)
(split-window-preferred-function
windows
(choice (const :tag "vertically" split-window)
;; FIXME: Add `sensibly' which chooses between
;; vertical or horizontal splits depending on the size
;; and shape of the window.
(const :tag "horizontally"
(lambda (window)
(split-window window nil 'horiz)))))
(window-min-height windows integer)
(window-min-width windows integer)
(scroll-preserve-screen-position
@ -464,5 +473,5 @@ since it could result in memory overflow and make Emacs crash."
(unless purify-flag
(provide 'cus-start))
;;; arch-tag: 4502730d-bcb3-4f5e-99a3-a86f2d54af60
;; arch-tag: 4502730d-bcb3-4f5e-99a3-a86f2d54af60
;;; cus-start.el ends here