diff options
-rw-r--r-- | doc/modules/skribilo/documentation/api.scm | 9 | ||||
-rw-r--r-- | doc/modules/skribilo/documentation/extension.scm | 5 | ||||
-rw-r--r-- | doc/modules/skribilo/documentation/manual.scm | 5 | ||||
-rw-r--r-- | src/guile/skribilo/writer.scm | 2 |
4 files changed, 10 insertions, 11 deletions
diff --git a/doc/modules/skribilo/documentation/api.scm b/doc/modules/skribilo/documentation/api.scm index 27ea385..ab445a4 100644 --- a/doc/modules/skribilo/documentation/api.scm +++ b/doc/modules/skribilo/documentation/api.scm @@ -1,4 +1,5 @@ ;;; api.scm -- The style for documenting Scheme APIs. +;;; -*- coding: iso-8859-1 -*- ;;; ;;; Copyright 2005, 2006, 2007, 2008, 2009 Ludovic Courtès <ludo@gnu.org> ;;; Copyright 2003, 2004 Manuel Serrano @@ -27,7 +28,7 @@ :use-module (skribilo output) :use-module (skribilo lib) ;; `define-markup' :use-module (skribilo utils compat) - :use-module (skribilo utils syntax) ;; `%skribilo-module-reader' + :use-module (skribilo utils syntax) ;; `skribilo-module-syntax' :use-module (skribilo package base) :use-module (skribilo documentation manual) @@ -37,7 +38,7 @@ :use-module (ice-9 match) :use-module (ice-9 optargs)) -(fluid-set! current-reader %skribilo-module-reader) +(skribilo-module-syntax) ;*---------------------------------------------------------------------*/ @@ -824,7 +825,3 @@ (map make-row-for-custom (filter cadr args)))))))))))) - -;;; Local Variables: -;;; coding: latin-1 -;;; End: diff --git a/doc/modules/skribilo/documentation/extension.scm b/doc/modules/skribilo/documentation/extension.scm index 7efee6f..0371b93 100644 --- a/doc/modules/skribilo/documentation/extension.scm +++ b/doc/modules/skribilo/documentation/extension.scm @@ -1,7 +1,8 @@ ;;; extension.scm -- The Skribilo package for documenting extensions. +;;; -*- coding: iso-8859-1 -*- ;;; +;;; Copyright 2007, 2009 Ludovic Courtès <ludo@gnu.org> ;;; Copyright 2003, 2004 Manuel Serrano -;;; Copyright 2007 Ludovic Courtès <ludo@gnu.org> ;;; ;;; ;;; This program is free software; you can redistribute it and/or modify @@ -41,7 +42,7 @@ :use-module (ice-9 optargs)) -(fluid-set! current-reader %skribilo-module-reader) +(skribilo-module-syntax) ;*---------------------------------------------------------------------*/ diff --git a/doc/modules/skribilo/documentation/manual.scm b/doc/modules/skribilo/documentation/manual.scm index 3ac1386..0163289 100644 --- a/doc/modules/skribilo/documentation/manual.scm +++ b/doc/modules/skribilo/documentation/manual.scm @@ -1,6 +1,7 @@ ;;; manual.scm -- Skribilo manuals and documentation style. +;;; -*- coding: iso-8859-1 -*- ;;; -;;; Copyright 2007, 2008 Ludovic Courtès <ludo@gnu.org> +;;; Copyright 2007, 2008, 2009 Ludovic Courtès <ludo@gnu.org> ;;; Copyright 2003, 2004 Manuel Serrano ;;; ;;; @@ -41,7 +42,7 @@ :use-module (srfi srfi-13) :use-module (srfi srfi-37)) -(fluid-set! current-reader %skribilo-module-reader) +(skribilo-module-syntax) ;*---------------------------------------------------------------------*/ diff --git a/src/guile/skribilo/writer.scm b/src/guile/skribilo/writer.scm index d105a05..08e72d5 100644 --- a/src/guile/skribilo/writer.scm +++ b/src/guile/skribilo/writer.scm @@ -40,7 +40,7 @@ :use-module (ice-9 optargs)) -(fluid-set! current-reader %skribilo-module-reader) +(skribilo-module-syntax) |