aboutsummaryrefslogtreecommitdiff
path: root/src/guile/skribilo/module.scm
diff options
context:
space:
mode:
authorLudovic Courtes2006-01-08 23:33:50 +0000
committerLudovic Courtes2006-01-08 23:33:50 +0000
commit1ae0ae57ffd21ac52a313f09ff838ff097863ed5 (patch)
tree4235ac0b0d6aeefa48ad463c62894d8af72caa66 /src/guile/skribilo/module.scm
parent2b8a108dbe20569d27cd27e9aae27044a9723e98 (diff)
parent20e5a989999ca11d68bf90417402c60c275dd0cc (diff)
downloadskribilo-1ae0ae57ffd21ac52a313f09ff838ff097863ed5.tar.gz
skribilo-1ae0ae57ffd21ac52a313f09ff838ff097863ed5.tar.lz
skribilo-1ae0ae57ffd21ac52a313f09ff838ff097863ed5.zip
Cleaning the compatibility module and other annoyances.
* src/skribilo.in: Catch exceptions and call `(exit 1)' when caught. * doc/user/Makefile.am (skribilo): Fixed. * src/guile/skribilo.scm: Updated copyright year. * src/guile/skribilo/compat.scm: Moved to `utils'. * src/guile/skribilo/Makefile.am (dist_guilemodule_DATA): Removed `compat.scm'. * src/guile/skribilo/Makefile.am (dist_guilemodule_DATA): Added `compat.scm'. * src/guile/skribilo/coloring/lisp.scm: Use `(skribilo utils syntax)'. * src/guile/skribilo/module.scm (%skribilo-user-imports): Import `(skribilo utils compat)' instead of `(skribilo compat)'. Added more triggering procedures for `(skribilo source)'. * src/guile/skribilo/skribe/api.scm: Moved the definition of a Skribe-compatible `gensym' to `compat.scm'. * src/guile/skribilo/source.scm: Use `*source-path*' instead of `skribe-source-path'. git-archimport-id: lcourtes@laas.fr--2004-libre/skribilo--devel--1.2--patch-22
Diffstat (limited to 'src/guile/skribilo/module.scm')
-rw-r--r--src/guile/skribilo/module.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/src/guile/skribilo/module.scm b/src/guile/skribilo/module.scm
index b88c3b7..c9b7034 100644
--- a/src/guile/skribilo/module.scm
+++ b/src/guile/skribilo/module.scm
@@ -47,8 +47,8 @@
(ice-9 optargs) ;; `define*'
(skribilo utils syntax) ;; `unless', `when', etc.
+ (skribilo utils compat) ;; `skribe-load-path', etc.
(skribilo module)
- (skribilo compat) ;; `skribe-load-path', etc.
(skribilo ast) ;; `<document>', `document?', etc.
(skribilo config)
(skribilo runtime) ;; `the-options', `the-body', `make-string-replace'
@@ -68,7 +68,9 @@
;; FIXME: The following should eventually be
;; removed from here.
lout-structure-number-string))
- ((skribilo source) . (source-read-lines source-fontify))
+ ((skribilo source) . (source-read-lines source-fontify
+ language? language-extractor
+ language-fontifier source-fontify))
((skribilo coloring lisp) . (skribe scheme lisp))
((skribilo coloring xml) . (xml))
((skribilo color) .