summaryrefslogtreecommitdiff
path: root/ycurses/scripts/setglobvals.pl
diff options
context:
space:
mode:
Diffstat (limited to 'ycurses/scripts/setglobvals.pl')
-rwxr-xr-xycurses/scripts/setglobvals.pl32
1 files changed, 0 insertions, 32 deletions
diff --git a/ycurses/scripts/setglobvals.pl b/ycurses/scripts/setglobvals.pl
deleted file mode 100755
index f0763ac..0000000
--- a/ycurses/scripts/setglobvals.pl
+++ /dev/null
@@ -1,32 +0,0 @@
-#!/usr/bin/perl
-
-# The ycurses Project (2003)
-#
-# This script sets up some variables in src/glob.h
-
-use strict;
-
-use scripts::modules::file;
-
-my $file = 'src/glob.h';
-my $gmake = `which gmake`;
-my @glob = fopen($file);
-chomp($gmake);
-
-print "-> Setting values in $file\n";
-
-my $modified = 0;
-foreach (@glob)
-{
- if (/^(#define GMAKE) "(.*)"/)
- {
- if ($2 ne "$gmake \\0")
- {
- s/^$1 "$2"/#define GMAKE "$gmake \\0"/;
- print " -> Set $gmake\n";
- fwrite($file,@glob);
- last;
- }
- }
-}
-