aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2014-10-15 13:32:41 -0400
committerStefan Monnier2014-10-15 13:32:41 -0400
commitdcdf2bd8d690168eed44563651e2d8f379b9c80e (patch)
tree5de46491f3995fbf10f56c780370f6bf00815a13
parentf65b226e7abf1e746d9f6a995bf7db3da1997795 (diff)
downloademacs-dcdf2bd8d690168eed44563651e2d8f379b9c80e.tar.gz
emacs-dcdf2bd8d690168eed44563651e2d8f379b9c80e.zip
* lisp/emacs-lisp/eldoc.el (global-eldoc-mode): Enable by default.
Remove incorrect handling of eldoc-print-after-edit. (eldoc-message-commands, eldoc-last-data): Use defvar. * lisp/loadup.el (emacs-lisp/eldoc): Load it. * src/lisp.mk (lisp): Add emacs-lisp/eldoc.elc.
-rw-r--r--etc/NEWS2
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/emacs-lisp/eldoc.el17
-rw-r--r--lisp/loadup.el1
-rw-r--r--src/ChangeLog23
-rw-r--r--src/lisp.mk1
6 files changed, 30 insertions, 19 deletions
diff --git a/etc/NEWS b/etc/NEWS
index 6c27831e6f0..64c8c71dc76 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -103,6 +103,8 @@ this has no effect.
103 103
104* Editing Changes in Emacs 25.1 104* Editing Changes in Emacs 25.1
105 105
106** New minor mode global-eldoc-mode is enabled by default.
107
106** Emacs now supports "bracketed paste mode" when running on a terminal 108** Emacs now supports "bracketed paste mode" when running on a terminal
107that supports it. This facility allows Emacs to understand pasted 109that supports it. This facility allows Emacs to understand pasted
108chunks of text as strings to be inserted, instead of interpreting each 110chunks of text as strings to be inserted, instead of interpreting each
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 610cf6f8670..cf83767b924 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
12014-10-15 Stefan Monnier <monnier@iro.umontreal.ca> 12014-10-15 Stefan Monnier <monnier@iro.umontreal.ca>
2 2
3 * emacs-lisp/eldoc.el (global-eldoc-mode): Enable by default.
4 Remove incorrect handling of eldoc-print-after-edit.
5 (eldoc-message-commands, eldoc-last-data): Use defvar.
6 * loadup.el (emacs-lisp/eldoc): Load it.
7
3 * progmodes/m4-mode.el (m4-syntax-propertize): New var. 8 * progmodes/m4-mode.el (m4-syntax-propertize): New var.
4 (m4-mode): Use it. 9 (m4-mode): Use it.
5 (m4--quoted-p): New function. 10 (m4--quoted-p): New function.
diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el
index 7245989c4b0..6dddf5b9a40 100644
--- a/lisp/emacs-lisp/eldoc.el
+++ b/lisp/emacs-lisp/eldoc.el
@@ -47,9 +47,6 @@
47 47
48;;; Code: 48;;; Code:
49 49
50(require 'help-fns) ;For fundoc-usage handling functions.
51(require 'cl-lib)
52
53(defgroup eldoc nil 50(defgroup eldoc nil
54 "Show function arglist or variable docstring in echo area." 51 "Show function arglist or variable docstring in echo area."
55 :group 'lisp 52 :group 'lisp
@@ -129,7 +126,8 @@ choose to increase the number of buckets, you must do so before loading
129this file since the obarray is initialized at load time. 126this file since the obarray is initialized at load time.
130Remember to keep it a prime number to improve hash performance.") 127Remember to keep it a prime number to improve hash performance.")
131 128
132(defconst eldoc-message-commands 129(defvar eldoc-message-commands
130 ;; Don't define as `defconst' since it would then go to (read-only) purespace.
133 (make-vector eldoc-message-commands-table-size 0) 131 (make-vector eldoc-message-commands-table-size 0)
134 "Commands after which it is appropriate to print in the echo area. 132 "Commands after which it is appropriate to print in the echo area.
135ElDoc does not try to print function arglists, etc., after just any command, 133ElDoc does not try to print function arglists, etc., after just any command,
@@ -140,12 +138,14 @@ This variable contains an obarray of symbols; do not manipulate it
140directly. Instead, use `eldoc-add-command' and `eldoc-remove-command'.") 138directly. Instead, use `eldoc-add-command' and `eldoc-remove-command'.")
141 139
142;; Not a constant. 140;; Not a constant.
143(defconst eldoc-last-data (make-vector 3 nil) 141(defvar eldoc-last-data (make-vector 3 nil)
142 ;; Don't define as `defconst' since it would then go to (read-only) purespace.
144 "Bookkeeping; elements are as follows: 143 "Bookkeeping; elements are as follows:
145 0 - contains the last symbol read from the buffer. 144 0 - contains the last symbol read from the buffer.
146 1 - contains the string last displayed in the echo area for variables, 145 1 - contains the string last displayed in the echo area for variables,
147 or argument string for functions. 146 or argument string for functions.
148 2 - 'function if function args, 'variable if variable documentation.") 147 2 - `function' if function args, `variable' if variable documentation.")
148(make-obsolete-variable 'eldoc-last-data "use your own instead" "25.1")
149 149
150(defvar eldoc-last-message nil) 150(defvar eldoc-last-message nil)
151 151
@@ -203,14 +203,13 @@ expression point is on."
203(define-minor-mode global-eldoc-mode 203(define-minor-mode global-eldoc-mode
204 "Enable `eldoc-mode' in all buffers where it's applicable." 204 "Enable `eldoc-mode' in all buffers where it's applicable."
205 :group 'eldoc :global t 205 :group 'eldoc :global t
206 :initialize 'custom-initialize-delay
207 :init-value t
206 (setq eldoc-last-message nil) 208 (setq eldoc-last-message nil)
207 (if global-eldoc-mode 209 (if global-eldoc-mode
208 (progn 210 (progn
209 (when eldoc-print-after-edit
210 (setq-local eldoc-message-commands (eldoc-edit-message-commands)))
211 (add-hook 'post-command-hook #'eldoc-schedule-timer) 211 (add-hook 'post-command-hook #'eldoc-schedule-timer)
212 (add-hook 'pre-command-hook #'eldoc-pre-command-refresh-echo-area)) 212 (add-hook 'pre-command-hook #'eldoc-pre-command-refresh-echo-area))
213 (kill-local-variable 'eldoc-message-commands)
214 (remove-hook 'post-command-hook #'eldoc-schedule-timer) 213 (remove-hook 'post-command-hook #'eldoc-schedule-timer)
215 (remove-hook 'pre-command-hook #'eldoc-pre-command-refresh-echo-area))) 214 (remove-hook 'pre-command-hook #'eldoc-pre-command-refresh-echo-area)))
216 215
diff --git a/lisp/loadup.el b/lisp/loadup.el
index fd34648bb30..421c3d5bf3e 100644
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -282,6 +282,7 @@
282(load "vc/ediff-hook") 282(load "vc/ediff-hook")
283(load "uniquify") 283(load "uniquify")
284(load "electric") 284(load "electric")
285(load "emacs-lisp/eldoc")
285(if (not (eq system-type 'ms-dos)) (load "tooltip")) 286(if (not (eq system-type 'ms-dos)) (load "tooltip"))
286 287
287;; This file doesn't exist when building a development version of Emacs 288;; This file doesn't exist when building a development version of Emacs
diff --git a/src/ChangeLog b/src/ChangeLog
index b6f9401acf7..611e459d2a8 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,18 +1,21 @@
12014-10-15 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * lisp.mk (lisp): Add emacs-lisp/eldoc.elc.
4
12014-10-15 Eli Zaretskii <eliz@gnu.org> 52014-10-15 Eli Zaretskii <eliz@gnu.org>
2 6
3 Update the bidirectional reordering engine for Unicode 6.3 and 7.0. 7 Update the bidirectional reordering engine for Unicode 6.3 and 7.0.
4 * bidi.c (bidi_ignore_explicit_marks_for_paragraph_level): Remove 8 * bidi.c (bidi_ignore_explicit_marks_for_paragraph_level):
5 variable. 9 Remove variable.
6 (bidi_get_type): Return the isolate initiators and terminator 10 (bidi_get_type): Return the isolate initiators and terminator types.
7 types.
8 (bidi_isolate_fmt_char, bidi_paired_bracket_type) 11 (bidi_isolate_fmt_char, bidi_paired_bracket_type)
9 (bidi_fetch_char_skip_isolates, find_first_strong_char) 12 (bidi_fetch_char_skip_isolates, find_first_strong_char)
10 (bidi_find_bracket_pairs, bidi_resolve_brackets): New functions. 13 (bidi_find_bracket_pairs, bidi_resolve_brackets): New functions.
11 (bidi_set_sos_type): Renamed from bidi_set_sor_type and updated 14 (bidi_set_sos_type): Rename from bidi_set_sor_type and updated
12 for the new features. 15 for the new features.
13 (bidi_push_embedding_level, bidi_pop_embedding_level): Update to 16 (bidi_push_embedding_level, bidi_pop_embedding_level): Update to
14 push and pop correctly for isolates. 17 push and pop correctly for isolates.
15 (bidi_remember_char): Modified to accept an additional argument 18 (bidi_remember_char): Modify to accept an additional argument
16 and record the bidi type according to its value. 19 and record the bidi type according to its value.
17 (bidi_cache_iterator_state): Accept an additional argument to only 20 (bidi_cache_iterator_state): Accept an additional argument to only
18 update an existing state. Handle the new members of struct bidi_it. 21 update an existing state. Handle the new members of struct bidi_it.
@@ -140,8 +143,8 @@
140 (ns_dumpglyphs_image, ns_check_menu_open) 143 (ns_dumpglyphs_image, ns_check_menu_open)
141 (applicationDidFinishLaunching) 144 (applicationDidFinishLaunching)
142 (antialiasThresholdDidChange:) 145 (antialiasThresholdDidChange:)
143 (keyDown:, toggleFullScreen:, setPosition:portion:whole:): Remove 146 (keyDown:, toggleFullScreen:, setPosition:portion:whole:):
144 checks for OSX <= 10.5/10.6. 147 Remove checks for OSX <= 10.5/10.6.
145 (changeFont:): Use macfont on COCOA, nsfont on GNUSTEP. 148 (changeFont:): Use macfont on COCOA, nsfont on GNUSTEP.
146 (syms_of_nsterm): Call syms_of_macfont on COCOA, syms_of_nsfont on 149 (syms_of_nsterm): Call syms_of_macfont on COCOA, syms_of_nsfont on
147 GNUSTEP. 150 GNUSTEP.
@@ -166,8 +169,8 @@
166 (macfont_create_family_with_symbol) 169 (macfont_create_family_with_symbol)
167 (macfont_get_glyph_for_character) 170 (macfont_get_glyph_for_character)
168 (mac_font_get_glyphs_for_variants) 171 (mac_font_get_glyphs_for_variants)
169 (mac_ctfont_create_available_families, syms_of_macfont): Remove 172 (mac_ctfont_create_available_families, syms_of_macfont):
170 code for OSX < 10.6. 173 Remove code for OSX < 10.6.
171 (mac_font_family_group, mac_font_family_compare): Remove, only used 174 (mac_font_family_group, mac_font_family_compare): Remove, only used
172 for OSX < 10.6. 175 for OSX < 10.6.
173 176
diff --git a/src/lisp.mk b/src/lisp.mk
index 642e9af225f..675df2b66e6 100644
--- a/src/lisp.mk
+++ b/src/lisp.mk
@@ -165,6 +165,7 @@ lisp = \
165 $(lispsource)/vc/vc-hooks.elc \ 165 $(lispsource)/vc/vc-hooks.elc \
166 $(lispsource)/vc/ediff-hook.elc \ 166 $(lispsource)/vc/ediff-hook.elc \
167 $(lispsource)/electric.elc \ 167 $(lispsource)/electric.elc \
168 $(lispsource)/emacs-lisp/eldoc.elc \
168 $(lispsource)/uniquify.elc \ 169 $(lispsource)/uniquify.elc \
169 $(lispsource)/tooltip.elc 170 $(lispsource)/tooltip.elc
170 171