suzanne.soy/hyper-literate
1
0
Fork 0
Code Issues 4 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

added image/plain

Browse Source 
svn: r8644

original commit: 603246a15a1fc6ee623735ea7756324693e77143
This commit is contained in:
Matthias Felleisen 2008-02-13 15:36:57 +00:00
parent 91c33286c1
commit f5f65790ca
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
collects/scribble/manual.ss
View File

@ -244,7 +244,7 @@
litchar
verbatim)
(provide image onscreen menuitem defterm emph
(provide image image/plain onscreen menuitem defterm emph
schemefont schemevalfont schemeresultfont schemeidfont schemevarfont
schemeparenfont schemekeywordfont schememetafont schememodfont
filepath exec envvar Flag DFlag PFlag DPFlag
@ -261,6 +261,13 @@
(make-image-file filename-relative-to-source)
(decode-content alt))))
;; MF! -- the centerline is used in the drscheme manual
;; otherwise I'd switch
(define (image/plain filename-relative-to-source . alt)
(make-element
(make-image-file filename-relative-to-source)
(decode-content alt)))
(define (onscreen . str)
(make-element 'sf (decode-content str)))
(define (menuitem menu item)