Slideshow: fix subitem handling of #:bullet

svn: r15177
2009-06-15 11:54:05 +00:00 · 2009-06-15 11:54:05 +00:00 · be1790d3f5
commit be1790d3f5
parent 54fc941f1f
1 changed files with 2 additions and 2 deletions
--- a/collects/slideshow/core.ss
+++ b/collects/slideshow/core.ss
@ -873,10 +873,10 @@
                                         #:decode? [decode? #t]
                                         . s)
                         (inset (htl-append (/ gap-size 2)
-                                            o-bullet 
+                                            bullet 
                                            (para/kw #:width (- width
                                                                (* 2 gap-size)
-                                                                (pict-width o-bullet) 
+                                                                (pict-width bullet) 
                                                                (/ gap-size 2)) 
                                                     #:align align
                                                     #:fill? fill?