procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

srecode-inserter-prin-example compilation fix

Browse source 
* lisp/cedet/srecode/insert.el (srecode-inserter-prin-example):
Move prin1 example to file that defines the structure it prints.
This commit is contained in:
Lars Ingebrigtsen 2019-06-14 15:29:17 +02:00
parent 595e12c2da
commit 98df06c19e
2 changed files with 13 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lisp/cedet/srecode/insert.el
View file

@ -1063,6 +1063,19 @@ template where a ^ inserter occurs."
;; place.
(cl-call-next-method)))
(cl-defmethod srecode-inserter-prin-example ((ins (subclass srecode-template-inserter))
escape-start escape-end)
"Insert an example using inserter INS.
Arguments ESCAPE-START and ESCAPE-END are the current escape sequences in use."
(princ " ")
(princ escape-start)
(when (and (slot-exists-p ins 'key) (oref ins key))
(princ (format "%c" (oref ins key))))
(princ "VARNAME")
(princ escape-end)
(terpri)
)
(provide 'srecode/insert)
;; Local variables: