This changes podwrapper so that the input (POD) files should not contain an =encoding directive. However they must be UTF-8. Podwrapper then adds the '=encoding utf8' directive back during final generation. This in particular avoids problems with nested =encoding directives in fragments. These break POD, and are undesirable anyway. --- align/virt-alignment-scan.pod | 2 -- appliance/libguestfs-make-fixed-appliance.pod | 2 -- builder/virt-builder.pod | 2 -- builder/virt-index-validate.pod | 2 -- cat/virt-cat.pod | 2 -- cat/virt-filesystems.pod | 2 -- cat/virt-ls.pod | 2 -- daemon/guestfsd.pod | 2 -- df/virt-df.pod | 2 -- diff/virt-diff.pod | 2 -- edit/virt-edit.pod | 2 -- erlang/examples/guestfs-erlang.pod | 2 -- examples/guestfs-examples.pod | 2 -- examples/guestfs-faq.pod | 2 -- examples/guestfs-performance.pod | 2 -- examples/guestfs-recipes.pod | 2 -- examples/guestfs-testing.pod | 2 -- fish/guestfish.pod | 2 -- fish/libguestfs-tools.conf.pod | 2 -- fish/virt-copy-in.pod | 2 -- fish/virt-copy-out.pod | 2 -- fish/virt-tar-in.pod | 2 -- fish/virt-tar-out.pod | 2 -- format/virt-format.pod | 2 -- fuse/guestmount.pod | 2 -- fuse/guestunmount.pod | 2 -- golang/examples/guestfs-golang.pod | 2 -- guestfs-release-notes.pod | 2 -- inspector/virt-inspector.pod | 2 -- java/examples/guestfs-java.pod | 2 -- lua/examples/guestfs-lua.pod | 2 -- make-fs/virt-make-fs.pod | 2 -- ocaml/examples/guestfs-ocaml.pod | 2 -- perl/examples/guestfs-perl.pod | 2 -- podwrapper.pl.in | 8 ++++++-- python/examples/guestfs-python.pod | 2 -- rescue/virt-rescue.pod | 2 -- resize/virt-resize.pod | 2 -- ruby/examples/guestfs-ruby.pod | 2 -- sparsify/virt-sparsify.pod | 2 -- src/guestfs.pod | 2 -- sysprep/virt-sysprep.pod | 2 -- test-tool/libguestfs-test-tool.pod | 2 -- tools/virt-list-filesystems | 2 -- tools/virt-list-partitions | 2 -- tools/virt-tar | 2 -- tools/virt-win-reg | 2 -- 47 files changed, 6 insertions(+), 94 deletions(-) diff --git a/align/virt-alignment-scan.pod b/align/virt-alignment-scan.pod index 1809c14..8dba461 100644 --- a/align/virt-alignment-scan.pod +++ b/align/virt-alignment-scan.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-alignment-scan - Check alignment of virtual machine partitions diff --git a/appliance/libguestfs-make-fixed-appliance.pod b/appliance/libguestfs-make-fixed-appliance.pod index ab0b0c9..8022edf 100644 --- a/appliance/libguestfs-make-fixed-appliance.pod +++ b/appliance/libguestfs-make-fixed-appliance.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME libguestfs-make-fixed-appliance - Make a "fixed appliance" for libguestfs diff --git a/builder/virt-builder.pod b/builder/virt-builder.pod index d035c81..7cf345c 100644 --- a/builder/virt-builder.pod +++ b/builder/virt-builder.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =begin html <img src="virt-builder.svg" width="250" diff --git a/builder/virt-index-validate.pod b/builder/virt-index-validate.pod index 6b03703..d48a93a 100644 --- a/builder/virt-index-validate.pod +++ b/builder/virt-index-validate.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-index-validate - Validate virt-builder index file diff --git a/cat/virt-cat.pod b/cat/virt-cat.pod index 3041199..cf6af4f 100644 --- a/cat/virt-cat.pod +++ b/cat/virt-cat.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-cat - Display files in a virtual machine diff --git a/cat/virt-filesystems.pod b/cat/virt-filesystems.pod index 14b2dc0..fd345ac 100644 --- a/cat/virt-filesystems.pod +++ b/cat/virt-filesystems.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-filesystems - List filesystems, partitions, block devices, LVM in a virtual machine or disk image diff --git a/cat/virt-ls.pod b/cat/virt-ls.pod index 4324878..be955d3 100644 --- a/cat/virt-ls.pod +++ b/cat/virt-ls.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-ls - List files in a virtual machine diff --git a/daemon/guestfsd.pod b/daemon/guestfsd.pod index 60651ff..b68cb20 100644 --- a/daemon/guestfsd.pod +++ b/daemon/guestfsd.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfsd - guestfs daemon diff --git a/df/virt-df.pod b/df/virt-df.pod index 4c94af0..8c44467 100644 --- a/df/virt-df.pod +++ b/df/virt-df.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-df - Display free space on virtual filesystems diff --git a/diff/virt-diff.pod b/diff/virt-diff.pod index 9ec086f..9242829 100644 --- a/diff/virt-diff.pod +++ b/diff/virt-diff.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-diff - Differences between files in two virtual machines diff --git a/edit/virt-edit.pod b/edit/virt-edit.pod index 4730f50..4c5ae71 100644 --- a/edit/virt-edit.pod +++ b/edit/virt-edit.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-edit - Edit a file in a virtual machine diff --git a/erlang/examples/guestfs-erlang.pod b/erlang/examples/guestfs-erlang.pod index ea5ba3f..89cbda1 100644 --- a/erlang/examples/guestfs-erlang.pod +++ b/erlang/examples/guestfs-erlang.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-erlang - How to use libguestfs from Erlang diff --git a/examples/guestfs-examples.pod b/examples/guestfs-examples.pod index 2afb6ca..81601c5 100644 --- a/examples/guestfs-examples.pod +++ b/examples/guestfs-examples.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-examples - Examples of using libguestfs from C diff --git a/examples/guestfs-faq.pod b/examples/guestfs-faq.pod index ec49409..5609d7c 100644 --- a/examples/guestfs-faq.pod +++ b/examples/guestfs-faq.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-faq - libguestfs Frequently Asked Questions (FAQ) diff --git a/examples/guestfs-performance.pod b/examples/guestfs-performance.pod index 9f47e3c..8f395f6 100644 --- a/examples/guestfs-performance.pod +++ b/examples/guestfs-performance.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-performance - engineering libguestfs for greatest performance diff --git a/examples/guestfs-recipes.pod b/examples/guestfs-recipes.pod index 3538e8a..9bb6696 100644 --- a/examples/guestfs-recipes.pod +++ b/examples/guestfs-recipes.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =begin comment We break with tradition here and don't use ALL CAPS for the section diff --git a/examples/guestfs-testing.pod b/examples/guestfs-testing.pod index 237835b..2186ed3 100644 --- a/examples/guestfs-testing.pod +++ b/examples/guestfs-testing.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-testing - manual testing of libguestfs, you can help! diff --git a/fish/guestfish.pod b/fish/guestfish.pod index a0a884d..a53ef92 100644 --- a/fish/guestfish.pod +++ b/fish/guestfish.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfish - the guest filesystem shell diff --git a/fish/libguestfs-tools.conf.pod b/fish/libguestfs-tools.conf.pod index bba00e3..2f79fd6 100644 --- a/fish/libguestfs-tools.conf.pod +++ b/fish/libguestfs-tools.conf.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME libguestfs-tools.conf - configuration file for guestfish, guestmount, virt-rescue diff --git a/fish/virt-copy-in.pod b/fish/virt-copy-in.pod index f2223f2..3891ce5 100644 --- a/fish/virt-copy-in.pod +++ b/fish/virt-copy-in.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-copy-in - Copy files and directories into a virtual machine disk image. diff --git a/fish/virt-copy-out.pod b/fish/virt-copy-out.pod index 1d99caa..f3ad07c 100644 --- a/fish/virt-copy-out.pod +++ b/fish/virt-copy-out.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-copy-out - Copy files and directories out of a virtual machine disk image. diff --git a/fish/virt-tar-in.pod b/fish/virt-tar-in.pod index ef90f62..9ccad1d 100644 --- a/fish/virt-tar-in.pod +++ b/fish/virt-tar-in.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-tar-in - Unpack a tarball into a virtual machine disk image. diff --git a/fish/virt-tar-out.pod b/fish/virt-tar-out.pod index c64c5fc..b455ca3 100644 --- a/fish/virt-tar-out.pod +++ b/fish/virt-tar-out.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-tar-out - Pack a virtual machine disk image directory into a tarball. diff --git a/format/virt-format.pod b/format/virt-format.pod index ac2b8e6..caec411 100644 --- a/format/virt-format.pod +++ b/format/virt-format.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-format - Erase and make a blank disk diff --git a/fuse/guestmount.pod b/fuse/guestmount.pod index 6ebf51f..05a3c1d 100644 --- a/fuse/guestmount.pod +++ b/fuse/guestmount.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestmount - Mount a guest filesystem on the host using FUSE and libguestfs diff --git a/fuse/guestunmount.pod b/fuse/guestunmount.pod index 2038e77..72c5dc4 100644 --- a/fuse/guestunmount.pod +++ b/fuse/guestunmount.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestunmount - Unmount a guestmounted filesystem diff --git a/golang/examples/guestfs-golang.pod b/golang/examples/guestfs-golang.pod index d63486b..c2de45e 100644 --- a/golang/examples/guestfs-golang.pod +++ b/golang/examples/guestfs-golang.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-golang - How to use libguestfs from Go diff --git a/guestfs-release-notes.pod b/guestfs-release-notes.pod index a15ed22..d531209 100644 --- a/guestfs-release-notes.pod +++ b/guestfs-release-notes.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-release-notes - libguestfs Release Notes diff --git a/inspector/virt-inspector.pod b/inspector/virt-inspector.pod index 4578f42..66ca276 100644 --- a/inspector/virt-inspector.pod +++ b/inspector/virt-inspector.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-inspector - Display operating system version and other information about a virtual machine diff --git a/java/examples/guestfs-java.pod b/java/examples/guestfs-java.pod index 10deebe..5ea2e84 100644 --- a/java/examples/guestfs-java.pod +++ b/java/examples/guestfs-java.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-java - How to use libguestfs from Java diff --git a/lua/examples/guestfs-lua.pod b/lua/examples/guestfs-lua.pod index cb93db6..36ea297 100644 --- a/lua/examples/guestfs-lua.pod +++ b/lua/examples/guestfs-lua.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-lua - How to use libguestfs from Lua diff --git a/make-fs/virt-make-fs.pod b/make-fs/virt-make-fs.pod index 6817909..26b0350 100644 --- a/make-fs/virt-make-fs.pod +++ b/make-fs/virt-make-fs.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-make-fs - Make a filesystem from a tar archive or files diff --git a/ocaml/examples/guestfs-ocaml.pod b/ocaml/examples/guestfs-ocaml.pod index 86becfd..f185914 100644 --- a/ocaml/examples/guestfs-ocaml.pod +++ b/ocaml/examples/guestfs-ocaml.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-ocaml - How to use libguestfs from OCaml diff --git a/perl/examples/guestfs-perl.pod b/perl/examples/guestfs-perl.pod index 0571bcd..1042f69 100644 --- a/perl/examples/guestfs-perl.pod +++ b/perl/examples/guestfs-perl.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-perl - How to use libguestfs from Perl diff --git a/podwrapper.pl.in b/podwrapper.pl.in index 74432ad..c2cb5e1 100755 --- a/podwrapper.pl.in +++ b/podwrapper.pl.in @@ -31,8 +31,6 @@ use File::Basename; # https://www.redhat.com/archives/libguestfs/2013-May/thread.html#00088 eval { $Text::Wrap::huge = "overflow" }; -=encoding utf8 - =head1 NAME podwrapper.pl - Generate libguestfs documentation from POD input files @@ -291,6 +289,12 @@ foreach (@verbatims) { if $content eq $oldcontent; } +# There should be no =encoding line present in the content (we will add one). +die "$progname: $input: =encoding must not be present in input\n" + if $content =~ /^=encoding/m; + +$content = "=encoding utf8\n\n$content"; + if ($strict_checks) { # Verify sections present / not present. die "$progname: $input: missing AUTHOR or AUTHORS section\n" diff --git a/python/examples/guestfs-python.pod b/python/examples/guestfs-python.pod index 710a673..d1cb40f 100644 --- a/python/examples/guestfs-python.pod +++ b/python/examples/guestfs-python.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-python - How to use libguestfs from Python diff --git a/rescue/virt-rescue.pod b/rescue/virt-rescue.pod index c295bda..6e209d8 100644 --- a/rescue/virt-rescue.pod +++ b/rescue/virt-rescue.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-rescue - Run a rescue shell on a virtual machine diff --git a/resize/virt-resize.pod b/resize/virt-resize.pod index 0f42448..0fd7e9e 100644 --- a/resize/virt-resize.pod +++ b/resize/virt-resize.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-resize - Resize a virtual machine disk diff --git a/ruby/examples/guestfs-ruby.pod b/ruby/examples/guestfs-ruby.pod index df7f99a..5e4e187 100644 --- a/ruby/examples/guestfs-ruby.pod +++ b/ruby/examples/guestfs-ruby.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs-ruby - How to use libguestfs from Ruby diff --git a/sparsify/virt-sparsify.pod b/sparsify/virt-sparsify.pod index 59ef4f2..014c3d9 100644 --- a/sparsify/virt-sparsify.pod +++ b/sparsify/virt-sparsify.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-sparsify - Make a virtual machine disk sparse diff --git a/src/guestfs.pod b/src/guestfs.pod index 1e6ec3f..b3c32eb 100644 --- a/src/guestfs.pod +++ b/src/guestfs.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME guestfs - Library for accessing and modifying virtual machine images diff --git a/sysprep/virt-sysprep.pod b/sysprep/virt-sysprep.pod index 33ec624..1eaecef 100644 --- a/sysprep/virt-sysprep.pod +++ b/sysprep/virt-sysprep.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME virt-sysprep - Reset, unconfigure or customize a virtual machine so clones can be made diff --git a/test-tool/libguestfs-test-tool.pod b/test-tool/libguestfs-test-tool.pod index 2ac299b..116730c 100644 --- a/test-tool/libguestfs-test-tool.pod +++ b/test-tool/libguestfs-test-tool.pod @@ -1,5 +1,3 @@ -=encoding utf8 - =head1 NAME libguestfs-test-tool - Diagnostics for libguestfs diff --git a/tools/virt-list-filesystems b/tools/virt-list-filesystems index 6e2cb83..3a179de 100755 --- a/tools/virt-list-filesystems +++ b/tools/virt-list-filesystems @@ -24,8 +24,6 @@ use Pod::Usage; use Getopt::Long; use Locale::TextDomain 'libguestfs'; -=encoding utf8 - =head1 NAME virt-list-filesystems - List filesystems in a virtual machine or disk image diff --git a/tools/virt-list-partitions b/tools/virt-list-partitions index c268791..2487b56 100755 --- a/tools/virt-list-partitions +++ b/tools/virt-list-partitions @@ -24,8 +24,6 @@ use Pod::Usage; use Getopt::Long; use Locale::TextDomain 'libguestfs'; -=encoding utf8 - =head1 NAME virt-list-partitions - List partitions in a virtual machine or disk image diff --git a/tools/virt-tar b/tools/virt-tar index b13285d..41d875c 100755 --- a/tools/virt-tar +++ b/tools/virt-tar @@ -25,8 +25,6 @@ use Getopt::Long; use File::Basename; use Locale::TextDomain 'libguestfs'; -=encoding utf8 - =head1 NAME virt-tar - Extract or upload files to a virtual machine diff --git a/tools/virt-win-reg b/tools/virt-win-reg index bcd836c..a47db97 100755 --- a/tools/virt-win-reg +++ b/tools/virt-win-reg @@ -29,8 +29,6 @@ use File::Temp qw/tempdir/; use File::Basename; use Locale::TextDomain 'libguestfs'; -=encoding utf8 - =head1 NAME virt-win-reg - Export and merge Windows Registry entries from a Windows guest -- 1.8.5.3