mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-05 11:45:45 +00:00
Code Issues Releases Activity

(texinfo-insert-@uref): Renamed from

Browse Source 
texinfo-insert-@url.
(texinfo-insert-@url): A defalias for texinfo-insert-@uref.
(texinfo-mode-map): Bind "C-c C-c u" to texinfo-insert-@uref.
This commit is contained in:
Eli Zaretskii 2000-11-15 13:57:50 +00:00
parent c9e73000c0
commit 4fb0a34c57
2 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/ChangeLog
View File

@ -1,3 +1,10 @@
2000-11-15 Eli Zaretskii <eliz@is.elta.co.il>
* textmodes/texinfo.el (texinfo-insert-@uref): Renamed from
texinfo-insert-@url.
(texinfo-insert-@url): A defalias for texinfo-insert-@uref.
(texinfo-mode-map): Bind "C-c C-c u" to texinfo-insert-@uref.
2000-11-14 Stefan Monnier <monnier@cs.yale.edu>
* emacs-lisp/checkdoc.el (checkdoc-minor-mode) <defvar>: Remove.

8
lisp/textmodes/texinfo.el
View File

@ -398,10 +398,9 @@ chapter."
(define-key texinfo-mode-map "\C-c\C-c\C-e" 'texinfo-insert-@emph)
(define-key texinfo-mode-map "\C-c\C-cv" 'texinfo-insert-@var)
(define-key texinfo-mode-map "\C-c\C-cu" 'texinfo-insert-@url)
(define-key texinfo-mode-map "\C-c\C-cu" 'texinfo-insert-@uref)
(define-key texinfo-mode-map "\C-c\C-ct" 'texinfo-insert-@table)
(define-key texinfo-mode-map "\C-c\C-cs" 'texinfo-insert-@samp)
;; (define-key texinfo-mode-map "\C-c\C-cr" 'texinfo-insert-@uref)
(define-key texinfo-mode-map "\C-c\C-cq" 'texinfo-insert-@quotation)
(define-key texinfo-mode-map "\C-c\C-co" 'texinfo-insert-@noindent)
(define-key texinfo-mode-map "\C-c\C-cn" 'texinfo-insert-@node)
@ -822,12 +821,13 @@ The default is not to surround any existing words with the braces."
(interactive "P")
(texinfo-insert-@-with-arg "var" arg))
(defun texinfo-insert-@url (&optional arg)
(defun texinfo-insert-@uref (&optional arg)
"Insert a `@url{}' command in a Texinfo buffer.
A numeric argument says how many words the braces should surround.
The default is not to surround any existing words with the braces."
(interactive "P")
(texinfo-insert-@-with-arg "url" arg))
(texinfo-insert-@-with-arg "uref" arg))
(defalias 'texinfo-insert-@url 'texinfo-insert-@uref)
;;; Texinfo file structure