Rackety Slideshow tutorial

This commit is contained in:
Matthew Flatt 2011-02-11 09:59:48 -07:00
parent 0840430b21
commit 9d2e025e51
2 changed files with 5 additions and 5 deletions

View File

@ -32,9 +32,9 @@
#:title "About Slideshow" #:title "About Slideshow"
(para (bt "Slideshow") (para (bt "Slideshow")
"is a library for creating slide presentations") "is a library for creating slide presentations")
(item "A Slideshow presentation is a PLT Scheme program") (item "A Slideshow presentation is a Racket program")
(item "Instead of a WYSIWYG interface," (item "Instead of a WYSIWYG interface,"
"you get the power of Scheme")) "you get the power of Racket"))
(define (symbol n) (define (symbol n)
(text (string (integer->char n)) 'symbol (current-font-size))) (text (string (integer->char n)) 'symbol (current-font-size)))

View File

@ -209,8 +209,8 @@
(require slideshow/code) (require slideshow/code)
(slide (slide
#:title "Scheme Code" #:title "Racket Code"
(para "For Scheme code, the" (code slideshow/code) (para "For Racket code, the" (code slideshow/code)
"library provides a handy" (code code) "macro for" "library provides a handy" (code code) "macro for"
"typesetting literal code") "typesetting literal code")
(para "The" (code code) "macro uses source-location information" (para "The" (code code) "macro uses source-location information"
@ -870,7 +870,7 @@
(slide (slide
#:title "Your Own Slides" #:title "Your Own Slides"
(para "A Slideshow presentation is a Scheme program in a module," (para "A Slideshow presentation is a Racket program in a module,"
"so to make your own:") "so to make your own:")
(scale/improve-new-text ; a macro that improves font selection (scale/improve-new-text ; a macro that improves font selection
(code #,(tt "#lang") slideshow (code #,(tt "#lang") slideshow