mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-06 08:54:05 +00:00
(calc-info-goto-node): New function.
(calc-tutorial, calc-info-summary): Go to appropriate Calc info node in one step.
This commit is contained in:
parent
9d3c486a7e
commit
65ce291b9c
@ -160,21 +160,25 @@ Calc user interface as before (either M-# C or M-# K; initially M-# C)."
|
||||
(select-window (get-largest-window))
|
||||
(info "Calc"))
|
||||
|
||||
(defun calc-info-goto-node (node)
|
||||
"Go to a node in the Calculator info documentation."
|
||||
(interactive)
|
||||
(select-window (get-largest-window))
|
||||
(Info-goto-node (concat "(Calc)" node)))
|
||||
|
||||
(defun calc-tutorial ()
|
||||
"Run the Emacs Info system on the Calculator Tutorial."
|
||||
(interactive)
|
||||
(if (get-buffer-window "*Calculator*")
|
||||
(calc-quit))
|
||||
(calc-info)
|
||||
(Info-goto-node "Interactive Tutorial")
|
||||
(calc-info-goto-node "Interactive Tutorial")
|
||||
(calc-other-window)
|
||||
(message "Welcome to the Calc Tutorial!"))
|
||||
|
||||
(defun calc-info-summary ()
|
||||
"Run the Emacs Info system on the Calculator Summary."
|
||||
(interactive)
|
||||
(calc-info)
|
||||
(Info-goto-node "Summary"))
|
||||
(calc-info-goto-node "Summary"))
|
||||
|
||||
(defun calc-help ()
|
||||
(interactive)
|
||||
|
Loading…
Reference in New Issue
Block a user