From 5ca206ce46474fc47bfd966996df9fdbcb094a6c Mon Sep 17 00:00:00 2001 From: Paul Buetow Date: Sun, 21 Nov 2010 16:55:05 +0000 Subject: moving into ychat subdir --- scripts/setglobvals.pl | 32 -------------------------------- 1 file changed, 32 deletions(-) delete mode 100755 scripts/setglobvals.pl (limited to 'scripts/setglobvals.pl') diff --git a/scripts/setglobvals.pl b/scripts/setglobvals.pl deleted file mode 100755 index 13288a5..0000000 --- a/scripts/setglobvals.pl +++ /dev/null @@ -1,32 +0,0 @@ -#!/usr/bin/perl - -# The yChat 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; - } - } -} - -- cgit v1.2.3