aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/progmodes
diff options
context:
space:
mode:
authorKenichi Handa2014-07-05 23:07:57 +0900
committerKenichi Handa2014-07-05 23:07:57 +0900
commitaeb894a9a06d84d29b93ca04432d7cbed366e665 (patch)
treee2b73f9a76bc826c7a443e9a8d4fb3b49bdf7332 /lisp/progmodes
parent763a11d0d0dcf543e89a22c98f55ea07c40ceefa (diff)
parenta984543a4488ed08778eb775d62f7091db117945 (diff)
downloademacs-aeb894a9a06d84d29b93ca04432d7cbed366e665.tar.gz
emacs-aeb894a9a06d84d29b93ca04432d7cbed366e665.zip
merge trunk
Diffstat (limited to 'lisp/progmodes')
-rw-r--r--lisp/progmodes/f90.el4
-rw-r--r--lisp/progmodes/hideif.el3
-rw-r--r--lisp/progmodes/idlw-complete-structtag.el4
-rw-r--r--lisp/progmodes/idlw-help.el2
-rw-r--r--lisp/progmodes/idlw-shell.el6
-rw-r--r--lisp/progmodes/idlw-toolbar.el2
-rw-r--r--lisp/progmodes/idlwave.el9
-rw-r--r--lisp/progmodes/pascal.el4
-rw-r--r--lisp/progmodes/python.el28
9 files changed, 38 insertions, 24 deletions
diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el
index 6431fa4aaf2..c7f018f5f15 100644
--- a/lisp/progmodes/f90.el
+++ b/lisp/progmodes/f90.el
@@ -71,8 +71,8 @@
71;; For example: 71;; For example:
72;; (add-to-list 'auto-mode-alist '("\\.f\\'" . f90-mode)) 72;; (add-to-list 'auto-mode-alist '("\\.f\\'" . f90-mode))
73 73
74;; Once you have entered f90-mode, you may get more info by using 74;; Once you have entered f90-mode, you can get more info by using
75;; the command describe-mode (C-h m). For online help use 75;; the command describe-mode (C-h m). For help use
76;; C-h f <Name of function you want described>, or 76;; C-h f <Name of function you want described>, or
77;; C-h v <Name of variable you want described>. 77;; C-h v <Name of variable you want described>.
78 78
diff --git a/lisp/progmodes/hideif.el b/lisp/progmodes/hideif.el
index 6585668b927..f6562f32e94 100644
--- a/lisp/progmodes/hideif.el
+++ b/lisp/progmodes/hideif.el
@@ -138,7 +138,8 @@
138 138
139(defcustom hide-ifdef-exclude-define-regexp nil 139(defcustom hide-ifdef-exclude-define-regexp nil
140 "Ignore #define names if those names match this exclusion pattern." 140 "Ignore #define names if those names match this exclusion pattern."
141 :type 'string) 141 :type 'string
142 :version "24.5")
142 143
143(defvar hide-ifdef-mode-submap 144(defvar hide-ifdef-mode-submap
144 ;; Set up the submap that goes after the prefix key. 145 ;; Set up the submap that goes after the prefix key.
diff --git a/lisp/progmodes/idlw-complete-structtag.el b/lisp/progmodes/idlw-complete-structtag.el
index 39951730ab3..6cb04a03b7e 100644
--- a/lisp/progmodes/idlw-complete-structtag.el
+++ b/lisp/progmodes/idlw-complete-structtag.el
@@ -49,14 +49,14 @@
49;; 49;;
50;; New versions of IDLWAVE, documentation, and more information available 50;; New versions of IDLWAVE, documentation, and more information available
51;; from: 51;; from:
52;; http://idlwave.org 52;; http://github.com/jdtsmith/idlwave
53;; 53;;
54;; INSTALLATION 54;; INSTALLATION
55;; ============ 55;; ============
56;; Put this file on the emacs load path and load it with the following 56;; Put this file on the emacs load path and load it with the following
57;; line in your init file: 57;; line in your init file:
58;; 58;;
59;; (add-hook 'idlwave-load-hook 59;; (add-hook 'idlwave-load-hook
60;; (lambda () (require 'idlw-complete-structtag))) 60;; (lambda () (require 'idlw-complete-structtag)))
61;; 61;;
62;; DESCRIPTION 62;; DESCRIPTION
diff --git a/lisp/progmodes/idlw-help.el b/lisp/progmodes/idlw-help.el
index b9c41c9d699..3d42fe231bd 100644
--- a/lisp/progmodes/idlw-help.el
+++ b/lisp/progmodes/idlw-help.el
@@ -32,7 +32,7 @@
32;; along with new versions of IDLWAVE, documentation, and more 32;; along with new versions of IDLWAVE, documentation, and more
33;; information, at: 33;; information, at:
34;; 34;;
35;; http://idlwave.org 35;; http://github.com/jdtsmith/idlwave
36;; 36;;
37;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 37;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
38 38
diff --git a/lisp/progmodes/idlw-shell.el b/lisp/progmodes/idlw-shell.el
index a0683d1c409..876695b0809 100644
--- a/lisp/progmodes/idlw-shell.el
+++ b/lisp/progmodes/idlw-shell.el
@@ -40,7 +40,7 @@
40;; 40;;
41;; New versions of IDLWAVE, documentation, and more information 41;; New versions of IDLWAVE, documentation, and more information
42;; available from: 42;; available from:
43;; http://idlwave.org 43;; http://github.com/jdtsmith/idlwave
44;; 44;;
45;; INSTALLATION: 45;; INSTALLATION:
46;; ============= 46;; =============
@@ -58,7 +58,7 @@
58;; The newest version of this file can be found on the maintainers 58;; The newest version of this file can be found on the maintainers
59;; web site. 59;; web site.
60;; 60;;
61;; http://idlwave.org 61;; http://github.com/jdtsmith/idlwave
62;; 62;;
63;; DOCUMENTATION 63;; DOCUMENTATION
64;; ============= 64;; =============
@@ -923,7 +923,7 @@ IDL has currently stepped.")
923 Info documentation for this package is available. Use \\[idlwave-info] 923 Info documentation for this package is available. Use \\[idlwave-info]
924 to display (complain to your sysadmin if that does not work). 924 to display (complain to your sysadmin if that does not work).
925 For PostScript and HTML versions of the documentation, check IDLWAVE's 925 For PostScript and HTML versions of the documentation, check IDLWAVE's
926 homepage at URL `http://idlwave.org'. 926 homepage at URL `http://github.com/jdtsmith/idlwave'.
927 IDLWAVE has customize support - see the group `idlwave'. 927 IDLWAVE has customize support - see the group `idlwave'.
928 928
9298. Keybindings 9298. Keybindings
diff --git a/lisp/progmodes/idlw-toolbar.el b/lisp/progmodes/idlw-toolbar.el
index 7844890c22a..45672be7d97 100644
--- a/lisp/progmodes/idlw-toolbar.el
+++ b/lisp/progmodes/idlw-toolbar.el
@@ -29,7 +29,7 @@
29 29
30;; New versions of IDLWAVE, documentation, and more information 30;; New versions of IDLWAVE, documentation, and more information
31;; available from: 31;; available from:
32;; http://idlwave.org 32;; http://github.com/jdtsmith/idlwave
33 33
34 34
35;;; Code: 35;;; Code:
diff --git a/lisp/progmodes/idlwave.el b/lisp/progmodes/idlwave.el
index 86a16036e10..e66c9655df1 100644
--- a/lisp/progmodes/idlwave.el
+++ b/lisp/progmodes/idlwave.el
@@ -44,7 +44,7 @@
44;; 44;;
45;; New versions of IDLWAVE, documentation, and more information 45;; New versions of IDLWAVE, documentation, and more information
46;; available from: 46;; available from:
47;; http://idlwave.org 47;; http://github.com/jdtsmith/idlwave
48;; 48;;
49;; INSTALLATION 49;; INSTALLATION
50;; ============ 50;; ============
@@ -64,7 +64,7 @@
64;; The newest version of this file is available from the maintainer's 64;; The newest version of this file is available from the maintainer's
65;; Webpage: 65;; Webpage:
66;; 66;;
67;; http://idlwave.org 67;; http://github.com/jdtsmith/idlwave
68;; 68;;
69;; DOCUMENTATION 69;; DOCUMENTATION
70;; ============= 70;; =============
@@ -179,7 +179,7 @@
179 "Major mode for editing IDL .pro files." 179 "Major mode for editing IDL .pro files."
180 :tag "IDLWAVE" 180 :tag "IDLWAVE"
181 :link '(url-link :tag "Home Page" 181 :link '(url-link :tag "Home Page"
182 "http://idlwave.org") 182 "http://github.com/jdtsmith/idlwave")
183 :link '(emacs-commentary-link :tag "Commentary in idlw-shell.el" 183 :link '(emacs-commentary-link :tag "Commentary in idlw-shell.el"
184 "idlw-shell.el") 184 "idlw-shell.el")
185 :link '(emacs-commentary-link :tag "Commentary in idlwave.el" "idlwave.el") 185 :link '(emacs-commentary-link :tag "Commentary in idlwave.el" "idlwave.el")
@@ -1878,7 +1878,8 @@ The main features of this mode are
1878 Info documentation for this package is available. Use 1878 Info documentation for this package is available. Use
1879 \\[idlwave-info] to display (complain to your sysadmin if that does 1879 \\[idlwave-info] to display (complain to your sysadmin if that does
1880 not work). For Postscript, PDF, and HTML versions of the 1880 not work). For Postscript, PDF, and HTML versions of the
1881 documentation, check IDLWAVE's homepage at URL `http://idlwave.org'. 1881 documentation, check IDLWAVE's homepage at URL
1882 `http://github.com/jdtsmith/idlwave'.
1882 IDLWAVE has customize support - see the group `idlwave'. 1883 IDLWAVE has customize support - see the group `idlwave'.
1883 1884
188410.Keybindings 188510.Keybindings
diff --git a/lisp/progmodes/pascal.el b/lisp/progmodes/pascal.el
index cedc2986eda..f32d4641af0 100644
--- a/lisp/progmodes/pascal.el
+++ b/lisp/progmodes/pascal.el
@@ -26,8 +26,8 @@
26;; ===== 26;; =====
27 27
28;; Emacs should enter Pascal mode when you find a Pascal source file. 28;; Emacs should enter Pascal mode when you find a Pascal source file.
29;; When you have entered Pascal mode, you may get more info by pressing 29;; When you have entered Pascal mode, you can get more info by pressing
30;; C-h m. You may also get online help describing various functions by: 30;; C-h m. You can also get help describing various functions by:
31;; C-h f <Name of function you want described> 31;; C-h f <Name of function you want described>
32 32
33;; If you want to customize Pascal mode to fit you better, you may add 33;; If you want to customize Pascal mode to fit you better, you may add
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index 743981b3714..065a182904f 100644
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -1096,16 +1096,28 @@ the line will be re-indented automatically if needed."
1096 (when (and electric-indent-mode 1096 (when (and electric-indent-mode
1097 (eq (char-before) last-command-event)) 1097 (eq (char-before) last-command-event))
1098 (cond 1098 (cond
1099 ((and (not (bolp)) 1099 ;; Electric indent inside parens
1100 (memq (char-after) '(?\) ?\] ?\}))) 1100 ((and
1101 (not (bolp))
1102 (let ((paren-start (python-syntax-context 'paren)))
1103 ;; Check that point is inside parens.
1104 (when paren-start
1105 (not
1106 ;; Filter the case where input is happening in the same
1107 ;; line where the open paren is.
1108 (= (line-number-at-pos)
1109 (line-number-at-pos paren-start)))))
1110 ;; When content has been added before the closing paren or a
1111 ;; comma has been inserted, it's ok to do the trick.
1112 (or
1113 (memq (char-after) '(?\) ?\] ?\}))
1114 (eq (char-before) ?,)))
1101 (save-excursion 1115 (save-excursion
1102 (goto-char (line-beginning-position)) 1116 (goto-char (line-beginning-position))
1103 ;; If after going to the beginning of line the point 1117 (let ((indentation (python-indent-calculate-indentation)))
1104 ;; is still inside a paren it's ok to do the trick 1118 (when (< (current-indentation) indentation)
1105 (when (python-syntax-context 'paren) 1119 (indent-line-to indentation)))))
1106 (let ((indentation (python-indent-calculate-indentation))) 1120 ;; Electric colon
1107 (when (< (current-indentation) indentation)
1108 (indent-line-to indentation))))))
1109 ((and (eq ?: last-command-event) 1121 ((and (eq ?: last-command-event)
1110 (memq ?: electric-indent-chars) 1122 (memq ?: electric-indent-chars)
1111 (not current-prefix-arg) 1123 (not current-prefix-arg)