So, Mozarella it is for 1.1.7

[user/henk/code/inspircd.git] / make / configure.pm

diff --git a/make/configure.pm b/make/configure.pm
index a082492239c28ba0d7f2a59470a91660266e5f2a..dd2dc90896bd68af3e9596d577adbb90fbc889db 100644 (file)
--- a/make/configure.pm
+++ b/make/configure.pm
@@ -1,8 +1,17 @@
+#
+# Copyright 2002-2007 The ChatSpike Development Team
+# <brain@chatspike.net>
+# <Craig@chatspike.net>
+#
+# Licensed under GPL, please see the COPYING file
+# for more information
+#
+
 package make::configure;
 use Exporter 'import';
 use POSIX;
 use make::utilities;
-@EXPORT = qw(promptnumeric dumphash is_dir getmodules getrevision getcompilerflags getlinkerflags getdependencies resolve_directory yesno showhelp);
+@EXPORT = qw(promptnumeric dumphash is_dir getmodules getrevision getcompilerflags getlinkerflags getdependencies resolve_directory yesno showhelp promptstring);
 
 my $no_svn = 0;
 
@@ -139,6 +148,18 @@ sub promptnumeric($$)
        }
 }
 
+sub promptstring($$)
+{
+       my ($prompt,$default) = @_;
+       my $var;
+       print "$prompt\n";
+       print "[\033[1;32m$default\033[0m] -> ";
+       chomp($var = <STDIN>);
+       $var = $default if $var eq "";
+       print "\n";
+       return $var;
+}
+
 sub dumphash()
 {
        print "\n\033[1;32mPre-build configuration is complete!\033[0m\n\n";