From f107fdf1e388ba0f58b4f11939f56b5e0f4f68fa Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Mon, 9 Oct 2017 14:03:18 +0200
Subject: fix doble quotes in perldoc

---
 perl-install/bootloader.pm | 12 ++++++------
 perl-install/common.pm     |  2 +-
 perl-install/do_pkgs.pm    |  2 +-
 3 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 42f4f9586..98d9e0a4e 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -392,7 +392,7 @@ nb:
 
 =over 4
 
-=item * $boot_part comes from C</boot/grub/install.sh> "C<root (hd...)>" line
+=item * $boot_part comes from C</boot/grub/install.sh> C<root (hd...)> line
 
 =item * $grub2dev is C</boot/grub/device.map>
 
@@ -1673,7 +1673,7 @@ sub write_grub_device_map {
 
 =item parse_grub_file($grub_file)
 
-Parses things like "C<(hd0,4)/boot/vmlinuz>"
+Parses things like C<(hd0,4)/boot/vmlinuz>
 
 Returns: ("hd0", 4, "boot/vmlinuz")
 
@@ -1688,7 +1688,7 @@ sub parse_grub_file {
 
 =item grub2dev_and_file($grub_file, $grub2dev, $o_block_device)
 
-Takes things like "C<(hd0,4)/boot/vmlinuz>"
+Takes things like C<(hd0,4)/boot/vmlinuz>
 
 Returns: ("/dev/sda5", "boot/vmlinuz")
 
@@ -1705,7 +1705,7 @@ sub grub2dev_and_file {
 
 =item grub2devd($grub_file, $grub2dev, $o_block_device)
 
-Takes things like "C<(hd0,4)/boot/vmlinuz>"
+Takes things like C<(hd0,4)/boot/vmlinuz>
 
 Returns: "/dev/sda5"
 
@@ -1722,9 +1722,9 @@ Replaces
 
 =over 4
 
-=item * "C</vmlinuz>" with "C</boot/vmlinuz>" when "root" or "rootnoverify" is set for the entry
+=item * C</vmlinuz> with C</boot/vmlinuz> when "root" or "rootnoverify" is set for the entry
 
-=item * "C<(hdX,Y)>" in "C<(hdX,Y)/boot/vmlinuz...>" by appropriate path if possible/needed
+=item * C<(hdX,Y)> in C<(hdX,Y)/boot/vmlinuz...> by appropriate path if possible/needed
 
 =back
 
diff --git a/perl-install/common.pm b/perl-install/common.pm
index 16c2b9443..9ac290b2d 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -622,7 +622,7 @@ special unpack:
 
 =over 4
 
-=item * returning an array refs for each element like "C<s10>"
+=item * returning an array refs for each element like C<s10>
 
 =item * handling things like C<s10*> at the end of the format
 
diff --git a/perl-install/do_pkgs.pm b/perl-install/do_pkgs.pm
index 1715ac1a8..d55ef579a 100644
--- a/perl-install/do_pkgs.pm
+++ b/perl-install/do_pkgs.pm
@@ -193,7 +193,7 @@ sub is_installed {
 
 =item check_kernel_module_packages($do, $base_name)
 
-Takes something like "C<ati-kernel>" and returns:
+Takes something like C<ati-kernel> and returns:
 
 =over 4
 
-- 
cgit v1.2.1