Index: ossp-pkg/shiela/shiela.pl
RCS File: /v/ossp/cvs/ossp-pkg/shiela/shiela.pl,v
rcsdiff -q -kk '-r1.8' '-r1.9' -u '/v/ossp/cvs/ossp-pkg/shiela/shiela.pl,v' 2>/dev/null
--- shiela.pl	2001/05/12 07:24:16	1.8
+++ shiela.pl	2001/05/12 07:26:54	1.9
@@ -1403,7 +1403,7 @@
                     print STDERR "cvs import: Ignoring this operation - don't expect log messages!\n";
                     exit(0);
                 }
-                open(CVSS, "$RT->{cvs} -f -l -Q -n log -r$It $Is|");
+                open(CVSS, "$RT->{cvs} -f -l -Q -n log -r$It '$Is'|");
                 $rcslog = $_ while (<CVSS>);
                 close(CVSS);
             }
@@ -1519,7 +1519,7 @@
         my $rcslog = '';
         if ($Io eq 'A' or $Io eq 'M') {
             if (not $RT->{useserver}) {
-                open(CVSS, "$RT->{cvs} -f -l -Q -n log -r$Iv $Is|");
+                open(CVSS, "$RT->{cvs} -f -l -Q -n log -r$Iv '$Is'|");
                 $rcslog .= $_ while (<CVSS>);
                 close(CVSS);
             }
@@ -1579,7 +1579,7 @@
                     "============================================================\n" .
                     "\$ cvs update -p -r$Iv $Is | uuencode $Is\n";
                 if (not $RT->{useserver}) {
-                    open(CVSS, "$RT->{cvs} -f -l -Q -n update -p -r$Iv $Is | uuencode $Is |");
+                    open(CVSS, "$RT->{cvs} -f -l -Q -n update -p -r$Iv '$Is' | uuencode '$Is' |");
                     $cvsdiff .= $_ while (<CVSS>);
                     close(CVSS);
                 }
@@ -1602,7 +1602,7 @@
                     "============================================================\n" .
                     "\$ cvs update -p -r$Iv $Is\n";
                 if (not $RT->{useserver}) {
-                    open(CVSS, "$RT->{cvs} -f -l -Q -n update -p -r$Iv $Is|");
+                    open(CVSS, "$RT->{cvs} -f -l -Q -n update -p -r$Iv '$Is'|");
                     $cvsdiff .= $_ while (<CVSS>);
                     close(CVSS);
                 }
@@ -1629,8 +1629,8 @@
                     "\$ cvs update -p -r$Iv $Is >$Is.new\n" .
                     "\$ diff -u $Is.old $Is.new\n";
                 if (not $RT->{useserver}) {
-                    system("$RT->{cvs} -f -l -Q -n update -p -r$IV $Is | uuencode $Is >$Is.old");
-                    system("$RT->{cvs} -f -l -Q -n update -p -r$Iv $Is | uuencode $Is >$Is.new");
+                    system("$RT->{cvs} -f -l -Q -n update -p -r$IV '$Is' | uuencode '$Is' >$Is.old");
+                    system("$RT->{cvs} -f -l -Q -n update -p -r$Iv '$Is' | uuencode '$Is' >$Is.new");
                 }
                 else {
                     my $cvs = new CVS ($RT->{cvs}, $RT->{cvsroot});
@@ -1659,7 +1659,7 @@
                 #   file was modified, so we show the changed contents only
                 my $d = '';
                 if (not $RT->{useserver}) {
-                    open(FP, "$RT->{cvs} -f -l -Q -n diff -u -r$IV -r$Iv $Is|");
+                    open(FP, "$RT->{cvs} -f -l -Q -n diff -u -r$IV -r$Iv '$Is'|");
                     $d .= $_ while (<FP>);
                     close(FP);
                 }
@@ -1675,7 +1675,7 @@
                 my $Is_quoted = quotemeta($Is);
                 $d =~ s|^Index:.+?\ndiff\s+.*?\n||s;
                 $d =~ s|^(---\s+)${Is_quoted}(\s+)|$1$cvsdir/$Is$2|m;
-                $d =~ s|^(\+\+\+\s+)$Is(\s+)|$1$cvsdir/$Is$2|m;
+                $d =~ s|^(\+\+\+\s+)${Is_quoted}(\s+)|$1$cvsdir/$Is$2|m;
                 $cvsdiff .=
                     "<Diff $cvsdir/$Is>\n" .
                      "Index: $cvsdir/$Is\n" .