summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorLudovic Court`es2007-09-20 14:16:12 +0000
committerLudovic Court`es2007-09-20 14:16:12 +0000
commit57100588a4aa8ad705a755acc95d2c6678597f11 (patch)
tree96b2f53865199fd9566731b6cfab777ff56499a8 /src
parente38b2d70074f98d1410faa87f5c5500c2dc743ea (diff)
parent8ead9b042f96a719cf023ceede4177ed448a04c3 (diff)
downloadskribilo-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.scm6
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)))))
;*---------------------------------------------------------------------*/