Function: calc-graph-name
calc-graph-name is an autoloaded, interactive and byte-compiled
function defined in calc-graph.el.gz.
Signature
(calc-graph-name NAME)
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/calc/calc-graph.el.gz
(defun calc-graph-name (name)
(interactive "sTitle for current curve: ")
(calc-graph-init)
(with-current-buffer calc-gnuplot-input
(or (calc-graph-find-plot nil nil)
(error "No data points have been set!"))
(let ((base (point))
;; start
end)
(re-search-forward "[,\n]\\|[ \t]+with")
(setq end (match-beginning 0))
(goto-char base)
(if (looking-at "[^,\n]*[^,\n \t]\\([ \t]+title\\)")
(progn
(goto-char (match-beginning 1))
(delete-region (point) end))
(goto-char end))
(insert " title " (prin1-to-string name))))
(calc-graph-view-commands))