FUEL: support for the $sequence help syntax
parent
579875821b
commit
d9711b96d2
|
@ -128,6 +128,7 @@
|
|||
($low-level-note . fuel-markup--low-level-note)
|
||||
($markup-example . fuel-markup--markup-example)
|
||||
($maybe . fuel-markup--maybe)
|
||||
($sequence . fuel-markup--sequence)
|
||||
($methods . fuel-markup--methods)
|
||||
($next-link . (lambda (e) (fuel-markup--prefixed-link "Next:" e)))
|
||||
($nl . fuel-markup--newline)
|
||||
|
@ -500,6 +501,13 @@
|
|||
(fuel-markup--instance (cons '$instance (cdr e)))
|
||||
(insert " or f "))
|
||||
|
||||
(defun fuel-markup--sequence (e)
|
||||
(insert "a ")
|
||||
(fuel-markup--link (list '$link 'sequence 'sequence 'word))
|
||||
(insert " of ")
|
||||
(fuel-markup--print (cadr e))
|
||||
(insert "s"))
|
||||
|
||||
(defun fuel-markup--or (e)
|
||||
(let ((fst (car (cdr e)))
|
||||
(mid (butlast (cddr e)))
|
||||
|
|
Loading…
Reference in New Issue