summaryrefslogtreecommitdiff
path: root/ycurses/scripts/setglobvals.pl
diff options
context:
space:
mode:
authorPaul Buetow (mars.fritz.box) <paul@buetow.org>2013-12-15 11:49:02 +0100
committerPaul Buetow (mars.fritz.box) <paul@buetow.org>2013-12-15 11:49:02 +0100
commit3a96ab7e91145b367d05e98533b5f426f762f83f (patch)
treeac7758a706066e14b785ab6e5f7071a54baa856b /ycurses/scripts/setglobvals.pl
parent332d7b2107833018b3ef67b64ffe121bff1ef4fb (diff)
add packagespackages
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;
- }
- }
-}
-