Add `coding:' comments.

Add `coding:' comments for use by both Emacs and Guile 2.x.

40 files changed, 49 insertions, 17 deletions

diff --git a/src/guile/skribilo/biblio.scm b/src/guile/skribilo/biblio.scm
index 24b7118..87466c7 100644
--- a/src/guile/skribilo/biblio.scm
+++ b/src/guile/skribilo/biblio.scm
@@ -1,4 +1,5 @@
 ;;; biblio.scm  --  Bibliography functions.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2006, 2007, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2001, 2002, 2003, 2004  Manuel Serrano
diff --git a/src/guile/skribilo/biblio/author.scm b/src/guile/skribilo/biblio/author.scm
index df6c9b4..bef8357 100644
--- a/src/guile/skribilo/biblio/author.scm
+++ b/src/guile/skribilo/biblio/author.scm
@@ -1,6 +1,7 @@
 ;;; author.scm  --  Handling author names.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
-;;; Copyright 2006, 2007, 2008  Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2006, 2007, 2008, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;;
 ;;;
 ;;; This program is free software; you can redistribute it and/or modify
diff --git a/src/guile/skribilo/color.scm b/src/guile/skribilo/color.scm
index 16592f5..fa5eaa5 100644
--- a/src/guile/skribilo/color.scm
+++ b/src/guile/skribilo/color.scm
@@ -1,4 +1,5 @@
 ;;; color.scm -- Color management.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2006, 2007  Ludovic Courtès  <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Erick Gallesio - I3S-CNRS/ESSI <eg@essi.fr>
diff --git a/src/guile/skribilo/condition.scm b/src/guile/skribilo/condition.scm
index 85ab70e..9e4eb4c 100644
--- a/src/guile/skribilo/condition.scm
+++ b/src/guile/skribilo/condition.scm
@@ -1,4 +1,5 @@
 ;;; condition.scm  --  Skribilo SRFI-35 error condition hierarchy.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2006, 2007, 2008  Ludovic Courtès  <ludo@gnu.org>
 ;;;
diff --git a/src/guile/skribilo/config.in b/src/guile/skribilo/config.in
index 34c0404..ee00647 100644
--- a/src/guile/skribilo/config.in
+++ b/src/guile/skribilo/config.in
@@ -1,6 +1,7 @@
 ;;; config.scm  --  Skribilo configuration.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
-;;; Copyright 2005, 2006, 2007  Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2005, 2006, 2007, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;;
 ;;;
 ;;; This program is free software; you can redistribute it and/or modify
@@ -32,6 +33,5 @@
 
 
 ;;; Local Variables:
-;;; coding: latin-1
 ;;; mode: scheme
 ;;; End:
diff --git a/src/guile/skribilo/engine.scm b/src/guile/skribilo/engine.scm
index 51da726..89fb728 100644
--- a/src/guile/skribilo/engine.scm
+++ b/src/guile/skribilo/engine.scm
@@ -1,4 +1,5 @@
 ;;; engine.scm	-- Skribilo engines.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2007, 2008, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Erick Gallesio - I3S-CNRS/ESSI <eg@essi.fr>
diff --git a/src/guile/skribilo/engine/base.scm b/src/guile/skribilo/engine/base.scm
index fb9cb33..223b8a7 100644
--- a/src/guile/skribilo/engine/base.scm
+++ b/src/guile/skribilo/engine/base.scm
@@ -1,4 +1,5 @@
 ;;; base.scm  --  BASE Skribe engine
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2006, 2007  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Manuel Serrano
diff --git a/src/guile/skribilo/engine/context.scm b/src/guile/skribilo/engine/context.scm
index 10d5e1e..21a5898 100644
--- a/src/guile/skribilo/engine/context.scm
+++ b/src/guile/skribilo/engine/context.scm
@@ -1,4 +1,5 @@
 ;;; context.scm  --  ConTeXt engine.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2007, 2008  Ludovic Courtès <ludo@chbouib.org>
 ;;; Copyright 2004  Erick Gallesio - I3S-CNRS/ESSI <eg@essi.fr>
diff --git a/src/guile/skribilo/engine/html.scm b/src/guile/skribilo/engine/html.scm
index 42f18b2..e743c16 100644
--- a/src/guile/skribilo/engine/html.scm
+++ b/src/guile/skribilo/engine/html.scm
@@ -1,4 +1,5 @@
 ;;; html.scm  --  HTML engine.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2006, 2007, 2008, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Manuel Serrano
@@ -2310,5 +2311,4 @@
 
 ;;; Local Variables:
 ;;; mode: scheme
-;;; coding: latin-1
 ;;; End:
diff --git a/src/guile/skribilo/engine/html4.scm b/src/guile/skribilo/engine/html4.scm
index 61c5d8f..e07d0f0 100644
--- a/src/guile/skribilo/engine/html4.scm
+++ b/src/guile/skribilo/engine/html4.scm
@@ -1,4 +1,5 @@
 ;;; html4.scm  --  HTML 4.01 engine.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2004  Erick Gallesio - I3S-CNRS/ESSI <eg@essi.fr>
 ;;; Copyright 2007  Ludovic Courtès <ludo@chbouib.org>
diff --git a/src/guile/skribilo/engine/info.scm b/src/guile/skribilo/engine/info.scm
index 0a60b17..ec92ce5 100644
--- a/src/guile/skribilo/engine/info.scm
+++ b/src/guile/skribilo/engine/info.scm
@@ -1,4 +1,5 @@
 ;;; info.scm  --  GNU Info engine.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2008, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2001, 2002  Manuel Serrano
diff --git a/src/guile/skribilo/engine/latex.scm b/src/guile/skribilo/engine/latex.scm
index 89bf2af..ab19ee4 100644
--- a/src/guile/skribilo/engine/latex.scm
+++ b/src/guile/skribilo/engine/latex.scm
@@ -1,6 +1,7 @@
 ;;; latex.scm  --  LaTeX engine.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
-;;; Copyright 2007  Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2007, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;;
 ;;;
@@ -1745,8 +1746,3 @@
 ;*    Restore the base engine                                          */
 ;*---------------------------------------------------------------------*/
 (default-engine-set! (find-engine 'base))
-
-
-;;; Local Variables:
-;;; coding: latin-1
-;;; End:
diff --git a/src/guile/skribilo/engine/lout.scm b/src/guile/skribilo/engine/lout.scm
index e2796ff..047cfa7 100644
--- a/src/guile/skribilo/engine/lout.scm
+++ b/src/guile/skribilo/engine/lout.scm
@@ -1,6 +1,7 @@
 ;;; lout.scm  --  A Lout engine.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
-;;; Copyright 2004, 2005, 2006, 2007, 2008  Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2004, 2005, 2006, 2007, 2008, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;;
 ;;;
 ;;; This program is free software; you can redistribute it and/or modify
@@ -2958,6 +2959,5 @@
 
 ;; Local Variables: --
 ;; mode: Scheme --
-;; coding: latin-1 --
 ;; scheme-program-name: "guile" --
 ;; End: --
diff --git a/src/guile/skribilo/engine/xml.scm b/src/guile/skribilo/engine/xml.scm
index 0990d24..2515fac 100644
--- a/src/guile/skribilo/engine/xml.scm
+++ b/src/guile/skribilo/engine/xml.scm
@@ -1,4 +1,5 @@
 ;;; xml.scm  --  Generic XML engine.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;; Copyright 2007  Ludovic Courtès <ludo@chbouib.org>
diff --git a/src/guile/skribilo/evaluator.scm b/src/guile/skribilo/evaluator.scm
index 6ca0f13..be223ca 100644
--- a/src/guile/skribilo/evaluator.scm
+++ b/src/guile/skribilo/evaluator.scm
@@ -1,4 +1,5 @@
 ;;; eval.scm  --  Skribilo evaluator.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2006, 2009  Ludovic Courtès  <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Erick Gallesio - I3S-CNRS/ESSI <eg@essi.fr>
diff --git a/src/guile/skribilo/location.scm b/src/guile/skribilo/location.scm
index b580e79..d5bde98 100644
--- a/src/guile/skribilo/location.scm
+++ b/src/guile/skribilo/location.scm
@@ -1,4 +1,5 @@
 ;;; location.scm -- Skribilo source location.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2007, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Erick Gallesio - I3S-CNRS/ESSI <eg@unice.fr>
diff --git a/src/guile/skribilo/module.scm b/src/guile/skribilo/module.scm
index a7f67fc..1e898a0 100644
--- a/src/guile/skribilo/module.scm
+++ b/src/guile/skribilo/module.scm
@@ -1,6 +1,7 @@
 ;;; module.scm  --  Execution environment for Skribilo documents.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
-;;; Copyright 2005, 2006, 2007  Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2005, 2006, 2007, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;;
 ;;;
 ;;; This program is free software; you can redistribute it and/or modify
diff --git a/src/guile/skribilo/output.scm b/src/guile/skribilo/output.scm
index 1adac70..af38328 100644
--- a/src/guile/skribilo/output.scm
+++ b/src/guile/skribilo/output.scm
@@ -1,4 +1,5 @@
 ;;; output.scm  --  Skribilo output stage.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2006, 2008  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Erick Gallesio - I3S-CNRS/ESSI <eg@unice.fr>
diff --git a/src/guile/skribilo/package/acmproc.scm b/src/guile/skribilo/package/acmproc.scm
index 1799d05..6af6bb6 100644
--- a/src/guile/skribilo/package/acmproc.scm
+++ b/src/guile/skribilo/package/acmproc.scm
@@ -1,4 +1,5 @@
 ;;; acmproc.scm  --  The Skribe style for ACMPROC articles.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;; Copyright 2007  Ludovic Courtès <ludo@chbouib.org>
diff --git a/src/guile/skribilo/package/base.scm b/src/guile/skribilo/package/base.scm
index 4372b96..d829bba 100644
--- a/src/guile/skribilo/package/base.scm
+++ b/src/guile/skribilo/package/base.scm
@@ -1,4 +1,5 @@
 ;;; base.scm -- The base markup package of Skribe/Skribilo.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2006, 2007, 2008, 2009  Ludovic Courtès  <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Manuel Serrano
diff --git a/src/guile/skribilo/package/diff.scm b/src/guile/skribilo/package/diff.scm
index 519364b..05d45e7 100644
--- a/src/guile/skribilo/package/diff.scm
+++ b/src/guile/skribilo/package/diff.scm
@@ -1,4 +1,5 @@
 ;;; diff.scm  --  A document difference highlighting package.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2007  Ludovic Courtès <ludo@gnu.org>
 ;;;
diff --git a/src/guile/skribilo/package/eq.scm b/src/guile/skribilo/package/eq.scm
index 789583e..bc9980a 100644
--- a/src/guile/skribilo/package/eq.scm
+++ b/src/guile/skribilo/package/eq.scm
@@ -1,6 +1,7 @@
 ;;; eq.scm  --  An equation formatting package.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
-;;; Copyright 2005, 2006, 2007, 2008  Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2005, 2006, 2007, 2008, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;;
 ;;;
 ;;; This program is free software; you can redistribute it and/or modify
diff --git a/src/guile/skribilo/package/french.scm b/src/guile/skribilo/package/french.scm
index e7281d7..ab3b229 100644
--- a/src/guile/skribilo/package/french.scm
+++ b/src/guile/skribilo/package/french.scm
@@ -1,7 +1,8 @@
 ;;; french.scm  --  French Skribe style
+;;; -*- coding: iso-8859-1 -*-
 ;;;
+;;; Copyright 2007, 2009  Ludovic Courtès <ludo@chbouib.org>
 ;;; Copyright 2003, 2004  Manuel Serrano
-;;; Copyright 2007  Ludovic Courtès <ludo@chbouib.org>
 ;;;
 ;;;
 ;;; This program is free software; you can redistribute it and/or modify
diff --git a/src/guile/skribilo/package/html-navtabs.scm b/src/guile/skribilo/package/html-navtabs.scm
index 5cf355b..03174f1 100644
--- a/src/guile/skribilo/package/html-navtabs.scm
+++ b/src/guile/skribilo/package/html-navtabs.scm
@@ -1,4 +1,5 @@
 ;;; html-navtabs.scm  --  Producing HTML navigation tabs.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2004  Manuel Serrano
 ;;; Copyright 2007  Ludovic Courtès <ludo@gnu.org>
diff --git a/src/guile/skribilo/package/jfp.scm b/src/guile/skribilo/package/jfp.scm
index 012165e..a7ff50f 100644
--- a/src/guile/skribilo/package/jfp.scm
+++ b/src/guile/skribilo/package/jfp.scm
@@ -1,4 +1,5 @@
 ;;; jfp.scm  --  The Skribe style for JFP articles.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;; Copyright 2007  Ludovic Courtès <ludo@chbouib.org>
diff --git a/src/guile/skribilo/package/letter.scm b/src/guile/skribilo/package/letter.scm
index 5baf5dc..e86a647 100644
--- a/src/guile/skribilo/package/letter.scm
+++ b/src/guile/skribilo/package/letter.scm
@@ -1,4 +1,5 @@
 ;;; letter.scm  --  Skribe style for letters
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;; Copyright 2007  Ludovic Courtès <ludo@chbouib.org>
diff --git a/src/guile/skribilo/package/lncs.scm b/src/guile/skribilo/package/lncs.scm
index 28e565c..c30f5e1 100644
--- a/src/guile/skribilo/package/lncs.scm
+++ b/src/guile/skribilo/package/lncs.scm
@@ -1,4 +1,5 @@
 ;;; lncs.scm  --  The Skribilo style for LNCS articles.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;; Copyright 2007  Ludovic Courtès <ludovic.courtes@laas.fr>
diff --git a/src/guile/skribilo/package/pie.scm b/src/guile/skribilo/package/pie.scm
index 7203946..35b3a92 100644
--- a/src/guile/skribilo/package/pie.scm
+++ b/src/guile/skribilo/package/pie.scm
@@ -1,4 +1,5 @@
 ;;; pie.scm  --  An pie-chart formatting package.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2006, 2007, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;;
diff --git a/src/guile/skribilo/package/scribe.scm b/src/guile/skribilo/package/scribe.scm
index 8f16a2a..4c66ebc 100644
--- a/src/guile/skribilo/package/scribe.scm
+++ b/src/guile/skribilo/package/scribe.scm
@@ -1,4 +1,5 @@
 ;;; scribe.scm  --  Scribe Compatibility kit
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;; Copyright 2007  Ludovic Courtès <ludo@chbouib.org>
diff --git a/src/guile/skribilo/package/sigplan.scm b/src/guile/skribilo/package/sigplan.scm
index e00ec80..a13d6b6 100644
--- a/src/guile/skribilo/package/sigplan.scm
+++ b/src/guile/skribilo/package/sigplan.scm
@@ -1,4 +1,5 @@
 ;;; sigplan.scm  --  The Skribe style for ACMPROC articles.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;; Copyright 2007  Ludovic Courtès <ludo@chbouib.org>
diff --git a/src/guile/skribilo/package/slide.scm b/src/guile/skribilo/package/slide.scm
index 7ee2207..f5e8b61 100644
--- a/src/guile/skribilo/package/slide.scm
+++ b/src/guile/skribilo/package/slide.scm
@@ -1,6 +1,7 @@
 ;;; slide.scm  --  Overhead transparencies.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
-;;; Copyright 2006, 2007, 2008  Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2006, 2007, 2008, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;;
 ;;;
diff --git a/src/guile/skribilo/package/web-article.scm b/src/guile/skribilo/package/web-article.scm
index f33c987..f7e70df 100644
--- a/src/guile/skribilo/package/web-article.scm
+++ b/src/guile/skribilo/package/web-article.scm
@@ -1,4 +1,5 @@
 ;;; web-article.scm  --  A style to produce web articles.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2007, 2008  Ludovic Courtès <ludo@chbouib.org>
 ;;; Copyright 2003, 2004  Manuel Serrano
diff --git a/src/guile/skribilo/package/web-book.scm b/src/guile/skribilo/package/web-book.scm
index 6cdc84e..45b4866 100644
--- a/src/guile/skribilo/package/web-book.scm
+++ b/src/guile/skribilo/package/web-book.scm
@@ -1,4 +1,5 @@
 ;;; web-book.scm  --  The web book style.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;; Copyright 2007  Ludovic Courtès <ludo@chbouib.org>
diff --git a/src/guile/skribilo/package/web-book2.scm b/src/guile/skribilo/package/web-book2.scm
index 4dddac5..b7dff77 100644
--- a/src/guile/skribilo/package/web-book2.scm
+++ b/src/guile/skribilo/package/web-book2.scm
@@ -1,4 +1,5 @@
 ;;; web-book2.scm  --  Another web book style.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2008  Ludovic Courtès <ludo@gnu.org>
 ;;;
diff --git a/src/guile/skribilo/parameters.scm b/src/guile/skribilo/parameters.scm
index 23c2c1a..350a854 100644
--- a/src/guile/skribilo/parameters.scm
+++ b/src/guile/skribilo/parameters.scm
@@ -1,4 +1,5 @@
 ;;; parameters.scm  --  Skribilo settings as parameter objects.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2008  Ludovic Courtès <ludo@gnu.org>
 ;;;
diff --git a/src/guile/skribilo/prog.scm b/src/guile/skribilo/prog.scm
index a67b005..cbc19ed 100644
--- a/src/guile/skribilo/prog.scm
+++ b/src/guile/skribilo/prog.scm
@@ -1,4 +1,5 @@
 ;;; prog.scm  --  All the stuff for the prog markup
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2006, 2007, 2009  Ludovic Courtès  <ludo@gnu.org>
 ;;; Copyright 2003  Erick Gallesio - I3S-CNRS/ESSI <eg@essi.fr>
diff --git a/src/guile/skribilo/source.scm b/src/guile/skribilo/source.scm
index b3828e3..b0a2a7f 100644
--- a/src/guile/skribilo/source.scm
+++ b/src/guile/skribilo/source.scm
@@ -1,6 +1,7 @@
 ;;; source.scm	-- Highlighting source files.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
-;;; Copyright 2005, 2008  Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2005, 2008, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Erick Gallesio - I3S-CNRS/ESSI <eg@essi.fr>
 ;;;
 ;;;
diff --git a/src/guile/skribilo/table.scm b/src/guile/skribilo/table.scm
index 47b3894..4a35951 100644
--- a/src/guile/skribilo/table.scm
+++ b/src/guile/skribilo/table.scm
@@ -1,4 +1,5 @@
 ;;; table.scm  --  Routines to operate on `table' markups.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2008  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2001  Manuel Serrano
diff --git a/src/guile/skribilo/verify.scm b/src/guile/skribilo/verify.scm
index 32f2770..3f4145b 100644
--- a/src/guile/skribilo/verify.scm
+++ b/src/guile/skribilo/verify.scm
@@ -1,4 +1,5 @@
 ;;; verify.scm  --  Skribe AST verification.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2007, 2008  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Erick Gallesio - I3S-CNRS/ESSI <eg@unice.fr>
diff --git a/src/guile/skribilo/writer.scm b/src/guile/skribilo/writer.scm
index 42457c2..1032aae 100644
--- a/src/guile/skribilo/writer.scm
+++ b/src/guile/skribilo/writer.scm
@@ -1,4 +1,5 @@
 ;;; writer.scm  --  Markup writers.
+;;; -*- coding: iso-8859-1 -*-
 ;;;
 ;;; Copyright 2005, 2006, 2008, 2009  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Erick Gallesio - I3S-CNRS/ESSI <eg@essi.fr>