summaryrefslogtreecommitdiffstats
path: root/src/windows/build/signFiles.pl
diff options
context:
space:
mode:
authorKen Raeburn <raeburn@mit.edu>2007-09-24 22:05:56 +0000
committerKen Raeburn <raeburn@mit.edu>2007-09-24 22:05:56 +0000
commit5386b775b2fbce68cbc846f7dac3ef495e72457a (patch)
tree34e1350d51f8265d21fc69f47e293ea1dec1b8c1 /src/windows/build/signFiles.pl
parentecdd7622b03b8e3ffa1dce68e081fca9e9b0aa70 (diff)
downloadkrb5-5386b775b2fbce68cbc846f7dac3ef495e72457a.tar.gz
krb5-5386b775b2fbce68cbc846f7dac3ef495e72457a.tar.xz
krb5-5386b775b2fbce68cbc846f7dac3ef495e72457a.zip
Set svn:eol-style on a bunch of text-looking files that didn't have it
git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@19972 dc483132-0cff-0310-8789-dd5450dbe970
Diffstat (limited to 'src/windows/build/signFiles.pl')
-rw-r--r--src/windows/build/signFiles.pl52
1 files changed, 26 insertions, 26 deletions
diff --git a/src/windows/build/signFiles.pl b/src/windows/build/signFiles.pl
index 65ccb0a11c..ea093b1d7e 100644
--- a/src/windows/build/signFiles.pl
+++ b/src/windows/build/signFiles.pl
@@ -1,27 +1,27 @@
-#!perl -w
-
-#use strict;
-use Data::Dumper;
-
-sub signFiles {
- local ($signing, $config) = @_;
- local $exprs = $signing->{FilePatterns}->{value};
- local $template = $signing->{CommandTemplate}->{value};
- # Use Unix find instead of Windows find. Save PATH so we can restore it when we're done:
- local $savedPATH= $ENV{PATH};
- $ENV{PATH} = $config->{Config}->{unixfind}->{value}.";".$savedPATH;
- foreach $expr (split(" ", $exprs)) { ## exprs is something like "*.exe *.dll"
- local $cmd = "find . -iname \"$expr\"";
- local $list = `$cmd`; ## $list is files matching *.exe, for example.
- foreach $target (split("\n", $list)) {
- $target =~ s|/|\\|g; ## Flip path separators from unix-style to windows-style.
- local $template2 = $template;
- $template2 =~ s/%filename%/$target/;
- print "Info -- Signing $target\n" if ($verbose);
- !system("$template2") or die "Fatal -- Error signing $target.";
- }
- }
- $ENV{PATH} = $savedPATH;
- }
-
+#!perl -w
+
+#use strict;
+use Data::Dumper;
+
+sub signFiles {
+ local ($signing, $config) = @_;
+ local $exprs = $signing->{FilePatterns}->{value};
+ local $template = $signing->{CommandTemplate}->{value};
+ # Use Unix find instead of Windows find. Save PATH so we can restore it when we're done:
+ local $savedPATH= $ENV{PATH};
+ $ENV{PATH} = $config->{Config}->{unixfind}->{value}.";".$savedPATH;
+ foreach $expr (split(" ", $exprs)) { ## exprs is something like "*.exe *.dll"
+ local $cmd = "find . -iname \"$expr\"";
+ local $list = `$cmd`; ## $list is files matching *.exe, for example.
+ foreach $target (split("\n", $list)) {
+ $target =~ s|/|\\|g; ## Flip path separators from unix-style to windows-style.
+ local $template2 = $template;
+ $template2 =~ s/%filename%/$target/;
+ print "Info -- Signing $target\n" if ($verbose);
+ !system("$template2") or die "Fatal -- Error signing $target.";
+ }
+ }
+ $ENV{PATH} = $savedPATH;
+ }
+
return 1; \ No newline at end of file