Rename split-window-{above-each-other|split-window-side-by-side}

to split-window-below and split-window-right.

* lisp/window.el (split-window-below, split-window-right): Rename from
split-window-above-each-other and split-window-side-by-side
respectively.  All callers changed.
(split-window-sensibly, split-window-sensibly): Use them.
(split-window-keep-point): Doc fix.

* lisp/isearch.el: Add isearch-scroll property to split-window-below
and split-window-right.

* lisp/follow.el (follow-mode):
* lisp/vc/pcvs-util.el (cvs-pop-to-buffer-same-frame):
* lisp/progmodes/ada-xref.el (ada-gdb-application):
* lisp/emulation/vip.el (vip-buffer-in-two-windows):
* lisp/image-dired.el (image-dired-dired-with-window-configuration):
* lisp/dired-x.el (dired-do-find-marked-files):
* lisp/dired.el (dired-pop-to-buffer):
* lisp/bs.el (bs--show-with-configuration):
* lisp/vc/emerge.el (emerge-setup-windows):
* lisp/textmodes/two-column.el (2C-two-columns):
* lisp/textmodes/reftex-toc.el (reftex-toc):
* lisp/progmodes/gdb-mi.el (gdb-setup-windows):
* lisp/progmodes/fortran.el (fortran-window-create):
* lisp/net/newst-treeview.el (newsticker--treeview-window-init):
* lisp/emulation/ws-mode.el (wordstar-C-o-map, wordstar-mode):
* lisp/emulation/tpu-edt.el (tpu-gold-map):
* lisp/emulation/crisp.el (crisp-mode-map):
* lisp/calendar/calendar.el (calendar-basic-setup): Callers changed.

5 files changed, 10 insertions, 10 deletions

diff --git a/lisp/emulation/crisp.el b/lisp/emulation/crisp.el
index 567a57949b3..010e32857c5 100644
--- a/lisp/emulation/crisp.el
+++ b/lisp/emulation/crisp.el
@@ -71,8 +71,8 @@
     (define-key map [(f2) (left)]    'shrink-window-horizontally)
     (define-key map [(f2) (right)]   'enlarge-window-horizontally)
     (define-key map [(f2) (up)]      'shrink-window)
-    (define-key map [(f3) (down)]    'split-window-vertically)
-    (define-key map [(f3) (right)]   'split-window-horizontally)
+    (define-key map [(f3) (down)]    'split-window-below)
+    (define-key map [(f3) (right)]   'split-window-right)
 
     (define-key map [(f4)]           'delete-window)
     (define-key map [(control f4)]   'delete-other-windows)
diff --git a/lisp/emulation/edt.el b/lisp/emulation/edt.el
index 68550cc30e2..7ed0255d987 100644
--- a/lisp/emulation/edt.el
+++ b/lisp/emulation/edt.el
@@ -2362,7 +2362,7 @@ Argument GOLD-BINDING is the Emacs function to be bound to GOLD <KEY>."
   (edt-bind-gold-key-default  "\C-h" 'help-for-help); Just in case.
   (edt-bind-gold-key-default  [f1] 'help-for-help)
   (edt-bind-gold-key-default  [help] 'help-for-help)
-  (edt-bind-gold-key-default  "\C-\\" 'split-window-vertically)
+  (edt-bind-gold-key-default  "\C-\\" 'split-window-below)
 
   ;; GOLD bindings for regular keys.
   (edt-bind-gold-key-default "a" 'edt-key-not-assigned)
diff --git a/lisp/emulation/tpu-edt.el b/lisp/emulation/tpu-edt.el
index b4bf47a6504..e2ad5d81d27 100644
--- a/lisp/emulation/tpu-edt.el
+++ b/lisp/emulation/tpu-edt.el
@@ -459,7 +459,7 @@ Otherwise, use `spell-region'."
     ;; (define-key map "\\" nil)                        ; \
     (define-key map "]" 'blink-matching-open)           ; ]
     (define-key map "^" 'tpu-add-at-bol)                ; ^
-    (define-key map "_" 'split-window-vertically)       ; -
+    (define-key map "_" 'split-window-below)            ; -
     (define-key map "`" 'what-line)                     ; `
     (define-key map "a" 'tpu-toggle-newline-and-indent) ; a
     (define-key map "b" 'tpu-next-buffer)               ; b
@@ -487,7 +487,7 @@ Otherwise, use `spell-region'."
     (define-key map "y" 'copy-region-as-kill)           ; y
     (define-key map "z" 'suspend-emacs)                 ; z
     ;; (define-key map "{" nil)                         ; {
-    (define-key map "|" 'split-window-horizontally)     ; |
+    (define-key map "|" 'split-window-right)            ; |
     ;; (define-key map "}" nil)                         ; }
     (define-key map "~" 'exchange-point-and-mark)       ; ~
     (define-key map "\177" 'delete-window)              ; <X]
diff --git a/lisp/emulation/vip.el b/lisp/emulation/vip.el
index 6f4f0ce80ec..a0c6062fb29 100644
--- a/lisp/emulation/vip.el
+++ b/lisp/emulation/vip.el
@@ -1605,7 +1605,7 @@ used.  This behavior is controlled by the sign of prefix numeric value."
   "Show current buffer in two windows."
   (interactive)
   (delete-other-windows)
-  (split-window-vertically nil))
+  (split-window-below))
 
 
 ;; searching
diff --git a/lisp/emulation/ws-mode.el b/lisp/emulation/ws-mode.el
index 3a205c7c4f0..886b4d6d4c4 100644
--- a/lisp/emulation/ws-mode.el
+++ b/lisp/emulation/ws-mode.el
@@ -95,9 +95,9 @@
     (define-key map "\C-r" 'set-fill-column)
     (define-key map "\C-u" 'keyboard-quit)
     (define-key map "wd" 'delete-other-windows)
-    (define-key map "wh" 'split-window-horizontally)
+    (define-key map "wh" 'split-window-right)
     (define-key map "wo" 'other-window)
-    (define-key map "wv" 'split-window-vertically)
+    (define-key map "wv" 'split-window-below)
     map)
   "")
 
@@ -257,9 +257,9 @@ The key bindings are:
   C-o r         set-fill-column
   C-o C-u       keyboard-quit
   C-o wd        delete-other-windows
-  C-o wh        split-window-horizontally
+  C-o wh        split-window-right
   C-o wo        other-window
-  C-o wv        split-window-vertically
+  C-o wv        split-window-below
 
   C-q 0         ws-find-marker-0
   C-q 1         ws-find-marker-1