suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix `get-slides-as-picts' most-recent-slide implementation

Browse Source
This commit is contained in:
Matthew Flatt 2011-11-19 19:14:51 -07:00
parent 91ef073c09
commit 4464f2bf19
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/slideshow/slides-to-picts.rkt
View File

@ -52,7 +52,7 @@
(define (retract-talk-slide!)
(set! slides (cdr slides)))
(define (most-recent-talk-slide)
(and (pair? slides) (car slides)))
(and (pair? slides) (caar slides)))
(define display-progress void)
(define set-init-page! void)
(define set-use-background-frame! void)