aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/progmodes
diff options
context:
space:
mode:
authorAlan Mackenzie2011-11-03 22:03:18 +0000
committerAlan Mackenzie2011-11-03 22:03:18 +0000
commit85ba4cded3ef5a834c880edfdb6cf7ec3a747e9b (patch)
tree2a207d6e9e906119087ad357c892414db01211cb /lisp/progmodes
parenta6ba2ab9277496b66f6939766a3470c1f0a84287 (diff)
parent14e1d9eab9f4b7341f92397a0a9a2706f7b26ee9 (diff)
downloademacs-85ba4cded3ef5a834c880edfdb6cf7ec3a747e9b.tar.gz
emacs-85ba4cded3ef5a834c880edfdb6cf7ec3a747e9b.zip
Merge.
Diffstat (limited to 'lisp/progmodes')
-rw-r--r--lisp/progmodes/ada-xref.el2
-rw-r--r--lisp/progmodes/cc-defs.el2
-rw-r--r--lisp/progmodes/fortran.el2
-rw-r--r--lisp/progmodes/gdb-mi.el6
4 files changed, 6 insertions, 6 deletions
diff --git a/lisp/progmodes/ada-xref.el b/lisp/progmodes/ada-xref.el
index 7751f3e98fc..4a57a1eef67 100644
--- a/lisp/progmodes/ada-xref.el
+++ b/lisp/progmodes/ada-xref.el
@@ -1438,7 +1438,7 @@ project file."
1438 ;; is going to have some relevant information. 1438 ;; is going to have some relevant information.
1439 (if (or (not (string-match "gvd" (comint-arguments cmd 0 0))) 1439 (if (or (not (string-match "gvd" (comint-arguments cmd 0 0)))
1440 (string-match "--tty" cmd)) 1440 (string-match "--tty" cmd))
1441 (split-window-vertically)) 1441 (split-window-below))
1442 (switch-to-buffer buffer) 1442 (switch-to-buffer buffer)
1443 ))) 1443 )))
1444 1444
diff --git a/lisp/progmodes/cc-defs.el b/lisp/progmodes/cc-defs.el
index 93da6e3e2be..8632807f2b8 100644
--- a/lisp/progmodes/cc-defs.el
+++ b/lisp/progmodes/cc-defs.el
@@ -93,7 +93,7 @@
93 93
94;;; Variables also used at compile time. 94;;; Variables also used at compile time.
95 95
96(defconst c-version "5.31.9" 96(defconst c-version "5.32.2"
97 "CC Mode version number.") 97 "CC Mode version number.")
98 98
99(defconst c-version-sym (intern c-version)) 99(defconst c-version-sym (intern c-version))
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index d30b9673d09..fd3d42685f0 100644
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -1097,7 +1097,7 @@ See also `fortran-window-create-momentarily'."
1097 (scroll-bar-width (- (nth 2 window-edges) 1097 (scroll-bar-width (- (nth 2 window-edges)
1098 (car window-edges) 1098 (car window-edges)
1099 (window-width)))) 1099 (window-width))))
1100 (split-window-horizontally (+ fortran-line-length scroll-bar-width))) 1100 (split-window-right (+ fortran-line-length scroll-bar-width)))
1101 (other-window 1) 1101 (other-window 1)
1102 (switch-to-buffer " fortran-window-extra" t) 1102 (switch-to-buffer " fortran-window-extra" t)
1103 (select-window (previous-window)))) 1103 (select-window (previous-window))))
diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index dde00d753ac..f9ddabf1552 100644
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -4028,7 +4028,7 @@ window is dedicated."
4028 (let ((win0 (selected-window)) 4028 (let ((win0 (selected-window))
4029 (win1 (split-window nil ( / ( * (window-height) 3) 4))) 4029 (win1 (split-window nil ( / ( * (window-height) 3) 4)))
4030 (win2 (split-window nil ( / (window-height) 3))) 4030 (win2 (split-window nil ( / (window-height) 3)))
4031 (win3 (split-window-horizontally))) 4031 (win3 (split-window-right)))
4032 (gdb-set-window-buffer (gdb-locals-buffer-name) nil win3) 4032 (gdb-set-window-buffer (gdb-locals-buffer-name) nil win3)
4033 (select-window win2) 4033 (select-window win2)
4034 (set-window-buffer 4034 (set-window-buffer
@@ -4041,12 +4041,12 @@ window is dedicated."
4041 ;; can't find a source file. 4041 ;; can't find a source file.
4042 (list-buffers-noselect)))) 4042 (list-buffers-noselect))))
4043 (setq gdb-source-window (selected-window)) 4043 (setq gdb-source-window (selected-window))
4044 (let ((win4 (split-window-horizontally))) 4044 (let ((win4 (split-window-right)))
4045 (gdb-set-window-buffer 4045 (gdb-set-window-buffer
4046 (gdb-get-buffer-create 'gdb-inferior-io) nil win4)) 4046 (gdb-get-buffer-create 'gdb-inferior-io) nil win4))
4047 (select-window win1) 4047 (select-window win1)
4048 (gdb-set-window-buffer (gdb-stack-buffer-name)) 4048 (gdb-set-window-buffer (gdb-stack-buffer-name))
4049 (let ((win5 (split-window-horizontally))) 4049 (let ((win5 (split-window-right)))
4050 (gdb-set-window-buffer (if gdb-show-threads-by-default 4050 (gdb-set-window-buffer (if gdb-show-threads-by-default
4051 (gdb-threads-buffer-name) 4051 (gdb-threads-buffer-name)
4052 (gdb-breakpoints-buffer-name)) 4052 (gdb-breakpoints-buffer-name))