diff options
author | Ludovic Court`es | 2007-09-20 14:16:12 +0000 |
---|---|---|
committer | Ludovic Court`es | 2007-09-20 14:16:12 +0000 |
commit | 57100588a4aa8ad705a755acc95d2c6678597f11 (patch) | |
tree | 96b2f53865199fd9566731b6cfab777ff56499a8 /src | |
parent | e38b2d70074f98d1410faa87f5c5500c2dc743ea (diff) | |
parent | 8ead9b042f96a719cf023ceede4177ed448a04c3 (diff) | |
download | skribilo-57100588a4aa8ad705a755acc95d2c6678597f11.tar.gz skribilo-57100588a4aa8ad705a755acc95d2c6678597f11.tar.lz skribilo-57100588a4aa8ad705a755acc95d2c6678597f11.zip |
slide: Tiny fix.
* src/guile/skribilo/package/slide.scm (slide-embed): Provide an
identifier, pass ARGUMENTS.
git-archimport-id: skribilo@sv.gnu.org--2006/skribilo--devo--1.2--patch-166
Diffstat (limited to 'src')
-rw-r--r-- | src/guile/skribilo/package/slide.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/guile/skribilo/package/slide.scm b/src/guile/skribilo/package/slide.scm index 0a3d773..2f5d8a8 100644 --- a/src/guile/skribilo/package/slide.scm +++ b/src/guile/skribilo/package/slide.scm @@ -179,9 +179,11 @@ (markup 'slide-embed) (loc &invocation-location) (required-options '(:alt)) - (options `((:geometry-opt ,geometry-opt) + (ident (symbol->string (gensym "slide-embed"))) + (options `((:arguments ,arguments) + (:geometry-opt ,geometry-opt) (:alt ,alt) - ,@(the-options opt :geometry-opt :alt))) + ,@(the-options opt :arguments :geometry-opt :alt))) (body (the-body opt))))) ;*---------------------------------------------------------------------*/ |