summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Court`es2007-03-28 09:23:47 +0000
committerLudovic Court`es2007-03-28 09:23:47 +0000
commitd95eb6f5a7d1aba4ed3948071046a910af577896 (patch)
tree8f8fbab5621b24c573937e1d52fbfbeab228a5d4
parent331dc3ff8e3850f6e9c1a7e1dc69cd19c9e5bb4c (diff)
parentc1fdef39c43b90d357b1b54098234b88c4c69f9c (diff)
downloadskribilo-d95eb6f5a7d1aba4ed3948071046a910af577896.tar.gz
skribilo-d95eb6f5a7d1aba4ed3948071046a910af577896.tar.lz
skribilo-d95eb6f5a7d1aba4ed3948071046a910af577896.zip
`base' package: Introduced `breakable-space'.
* src/guile/skribilo/engine/base.scm (breakable-space): New writer. * src/guile/skribilo/engine/latex.scm (breakable-space): New writer. * src/guile/skribilo/engine/lout.scm (breakable-space): New writer. * src/guile/skribilo/package/base.scm (breakable-space): New markup. git-archimport-id: skribilo@sv.gnu.org--2006/skribilo--devo--1.2--patch-74
-rw-r--r--ChangeLog25
-rw-r--r--src/guile/skribilo/engine/base.scm7
-rw-r--r--src/guile/skribilo/engine/latex.scm7
-rw-r--r--src/guile/skribilo/engine/lout.scm6
-rw-r--r--src/guile/skribilo/package/base.scm5
5 files changed, 50 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index 6d2b452..58432e4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,6 +2,31 @@
# arch-tag: automatic-ChangeLog--skribilo@sv.gnu.org--2006/skribilo--devo--1.2
#
+2007-03-28 09:23:47 GMT Ludovic Court`es <ludovic.courtes@laas.fr> patch-74
+
+ Summary:
+ `base' package: Introduced `breakable-space'.
+ Revision:
+ skribilo--devo--1.2--patch-74
+
+ * src/guile/skribilo/engine/base.scm (breakable-space): New writer.
+
+ * src/guile/skribilo/engine/latex.scm (breakable-space): New writer.
+
+ * src/guile/skribilo/engine/lout.scm (breakable-space): New writer.
+
+ * src/guile/skribilo/package/base.scm (breakable-space): New markup.
+
+ modified files:
+ ChangeLog src/guile/skribilo/engine/base.scm
+ src/guile/skribilo/engine/latex.scm
+ src/guile/skribilo/engine/lout.scm
+ src/guile/skribilo/package/base.scm
+
+ new patches:
+ lcourtes@laas.fr--2006-libre/skribilo--devo--1.2--patch-33
+
+
2007-03-28 09:23:01 GMT Ludovic Court`es <ludovic.courtes@laas.fr> patch-73
Summary:
diff --git a/src/guile/skribilo/engine/base.scm b/src/guile/skribilo/engine/base.scm
index 6973eb2..2085ed6 100644
--- a/src/guile/skribilo/engine/base.scm
+++ b/src/guile/skribilo/engine/base.scm
@@ -185,6 +185,13 @@
(evaluate-document n e))))
;*---------------------------------------------------------------------*/
+;* breakable-space ... */
+;*---------------------------------------------------------------------*/
+(markup-writer 'breakable-space
+ :before " "
+ :action #f)
+
+;*---------------------------------------------------------------------*/
;* &the-bibliography ... */
;*---------------------------------------------------------------------*/
(markup-writer '&the-bibliography
diff --git a/src/guile/skribilo/engine/latex.scm b/src/guile/skribilo/engine/latex.scm
index 183c822..2d5e4b6 100644
--- a/src/guile/skribilo/engine/latex.scm
+++ b/src/guile/skribilo/engine/latex.scm
@@ -492,6 +492,13 @@
:action #f)
;*---------------------------------------------------------------------*/
+;* breakable-space ... */
+;*---------------------------------------------------------------------*/
+(markup-writer 'breakable-space
+ :before " %\n"
+ :action #f)
+
+;*---------------------------------------------------------------------*/
;* &latex-table-start */
;*---------------------------------------------------------------------*/
(markup-writer '&latex-table-start
diff --git a/src/guile/skribilo/engine/lout.scm b/src/guile/skribilo/engine/lout.scm
index b9b4812..4648217 100644
--- a/src/guile/skribilo/engine/lout.scm
+++ b/src/guile/skribilo/engine/lout.scm
@@ -984,6 +984,12 @@
;*---------------------------------------------------------------------*/
(markup-writer '~ :before "~" :action #f)
+;*---------------------------------------------------------------------*/
+;* breakable-space ... */
+;*---------------------------------------------------------------------*/
+(markup-writer 'breakable-space :before " &1s\n" :action #f)
+
+
(define (lout-page-orientation orientation)
;; Return a string representing the Lout page orientation name for symbol
;; `orientation'.
diff --git a/src/guile/skribilo/package/base.scm b/src/guile/skribilo/package/base.scm
index 01e8667..1971ca5 100644
--- a/src/guile/skribilo/package/base.scm
+++ b/src/guile/skribilo/package/base.scm
@@ -301,6 +301,11 @@
(body (the-body opts))))
;*---------------------------------------------------------------------*/
+;* breakable-space ... */
+;*---------------------------------------------------------------------*/
+(define-simple-markup breakable-space)
+
+;*---------------------------------------------------------------------*/
;* footnote ... */
;*---------------------------------------------------------------------*/
(define-markup (footnote #!rest opts