Commit b7b9deb8 authored by Jens Gustedt's avatar Jens Gustedt
Browse files

suppose that files are encoded in utf-8

parent eaaccbdb
......@@ -20,6 +20,7 @@ if 0; #### for this magic, see findSvnAuthors ####
use English;
use Getopt::Long;
use locale;
use open qw< :encoding(UTF-8) >;
### Read in files whoes names are given as arguments.
sub slurp(&;@);
......@@ -134,7 +135,7 @@ my %comend = (
my %slogan = (
"c++" => "// This may look like C code, but it really is -*- mode: c++; coding: utf-8 -*-",
"c" => "/* This may look like nonsense, but it really is -*- mode: C -*- */",
"c" => "/* This may look like nonsense, but it really is -*- mode: C; coding: utf-8 -*- */",
"latex" => "% This may look like nonsense, but it really is -*- mode: latex; coding: utf-8 -*-",
"csh" => "# This may look like nonsense, but it really is -*- mode: csh; coding: utf-8 -*-",
"sh" => "# This may look like nonsense, but it really is -*- mode: sh; coding: utf-8 -*-",
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment