summary refs log tree commit diff
path: root/src/guile
diff options
context:
space:
mode:
authorLudovic Court`es2007-06-11 13:28:26 +0000
committerLudovic Court`es2007-06-11 13:28:26 +0000
commitd576c3bce7a09fa15948baf5e69adce4fa59707a (patch)
treead56d7229fc6ebeaf925cf31cc8d198daa972c75 /src/guile
parent044c3a2a038b2295ee42d688dabc29628ff77d7b (diff)
downloadskribilo-d576c3bce7a09fa15948baf5e69adce4fa59707a.tar.gz
skribilo-d576c3bce7a09fa15948baf5e69adce4fa59707a.tar.lz
skribilo-d576c3bce7a09fa15948baf5e69adce4fa59707a.zip
Added a `:&location' argument to `table'.
* doc/modules/skribilo/documentation/api.scm (%undocumented-options):
  New.
  (doc-check-arguments): Use it to allow `:&location' to not be
  documented.

* src/guile/skribilo/package/base.scm (table): Added a `&location'
  argument.

git-archimport-id: lcourtes@laas.fr--2006-libre/skribilo--devo--1.2--patch-69
Diffstat (limited to 'src/guile')
-rw-r--r--src/guile/skribilo/package/base.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/guile/skribilo/package/base.scm b/src/guile/skribilo/package/base.scm
index a32f3f4..29eb2df 100644
--- a/src/guile/skribilo/package/base.scm
+++ b/src/guile/skribilo/package/base.scm
@@ -693,7 +693,7 @@
 (define-markup (table :rest
 		      opts
 		      :key
-		      (ident #f) (class #f)
+		      (ident #f) (class #f) (&location #f)
 		      (border #f) (width #f)
 		      (frame 'none) (rules 'none)
 		      (cellstyle 'collapse) (cellpadding #f) (cellspacing #f))
@@ -734,7 +734,7 @@
 	     (markup 'table)
 	     (ident (or ident (symbol->string (gensym "table"))))
 	     (class class)
-             (loc   &invocation-location)
+             (loc   (or &location &invocation-location))
 	     (required-options '(:width :frame :rules))
 	     (options `((:frame ,frame)
 			(:rules ,rules)