Commit d3d02e65 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

* autoarg.el (autoarg-mode, autoarg-kp-mode):

* hl-line.el (hl-line-mode): Use the new :global key argument.
parent 139f2b7c
2000-06-05 Stefan Monnier <monnier@cs.yale.edu>
* autoarg.el (autoarg-mode, autoarg-kp-mode):
* hl-line.el (hl-line-mode): Use the new :global key argument.
* tar-mode.el (tar-header-block-recompute-checksum): Remove.
(tar-clip-time-string): Prepend a space.
(tar-grind-file-mode): Construct a string rather than modifying one.
(tar-header-block-summarize): Fix docstring.
Use `format' rather than an error-prone set of copy-loops.
* diff-mode.el (diff-font-lock-keywords, diff-hunk-header-re)
(diff-goto-source, diff-unified->context, diff-context->unified)
(diff-reverse-direction, diff-fixup-modifs): Fix the regexps to
understand the format output by the `-p' argument to diff.
* progmodes/sh-script.el (sh-symbol-list, sh-number-or-symbol-list)
(sh-re-done): Use defconst.
(sh-indent-supported-here, sh-electric-rparen-needed-here): Add defvar.
(sh-help-string-for-variable, sh-guess-basic-offset):
Don't quote lambdas.
(sh-electric-rparen, sh-electric-hash, sh-search-word): Docstring typo.
(sh-regexp-for-done, sh-kw-alist, sh-kw): Moved to before their use.
* mail/mh-comp.el (mh-send-sub): Check mh-etc is bound before using it.
(mh-letter-mode): Derive from text-mode.
This implicitly means that it now calls kill-all-local-variables.
......
......@@ -110,7 +110,7 @@ then invokes the normal binding of \\[autoarg-terminate].
`C-u \\[autoarg-terminate]' invokes the normal binding of \\[autoarg-terminate] four times.
\\{autoarg-mode-map}"
(global . nil) " Aarg" autoarg-mode-map)
nil " Aarg" autoarg-mode-map :global t)
;;;###autoload
(define-minor-mode autoarg-kp-mode
......@@ -121,7 +121,7 @@ This is similar to \\[autoarg-mode] but rebinds the keypad keys `kp-1'
&c to supply digit arguments.
\\{autoarg-kp-mode-map}"
(global . nil) " Aakp" autoarg-kp-mode-map
nil " Aakp" autoarg-kp-mode-map :global t
(if autoarg-kp-mode
(dotimes (i 10)
(let ((sym (intern (format "kp-%d" i))))
......
......@@ -81,7 +81,7 @@
With ARG, turn Hl-Line mode on if ARG is positive, off otherwise.
Uses functions `hl-line-unhighlight' and `hl-line-highlight' on
`pre-command-hook' and `post-command-hook'."
(global . nil) nil nil
nil nil nil :global t
(if hl-line-mode
(progn
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment