Function: texinfo-value
texinfo-value is a byte-compiled function defined in texinfmt.el.gz.
Signature
(texinfo-value)
Documentation
Insert the string to which the flag is set.
The command @set foo This is a string.
sets flag foo to the value: This is a string.
The command @value{foo} expands to the value.
Source Code
;; Defined in /usr/src/emacs/lisp/textmodes/texinfmt.el.gz
(defun texinfo-value ()
"Insert the string to which the flag is set.
The command `@set foo This is a string.'
sets flag foo to the value: `This is a string.'
The command `@value{foo}' expands to the value."
(let ((arg (texinfo-parse-arg-discard)))
(cond ((and
(eq (get (car (read-from-string arg)) 'texinfo-whether-setp)
'flag-set)
(get (car (read-from-string arg)) 'texinfo-set-value))
(insert (get (car (read-from-string arg)) 'texinfo-set-value)))
((eq (get (car (read-from-string arg)) 'texinfo-whether-setp)
'flag-cleared)
(insert (format "{No value for \"%s\"}" arg)))
((eq (get (car (read-from-string arg)) 'texinfo-whether-setp) nil)
(insert (format "{No value for \"%s\"}" arg))))))