X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=tools%2Fgenssl;h=6061f2e340e6b517ba44f6e2b8641e85dc800f8b;hb=2e91d9b2e19a5dee8e5e0959bc9face260c22daf;hp=e4d5bf1f40b11190cb4351963b0829bd528d3ceb;hpb=d23c030c9a8fd58807438245a004e4aa5b7288ba;p=user%2Fhenk%2Fcode%2Finspircd.git diff --git a/tools/genssl b/tools/genssl index e4d5bf1f4..6061f2e34 100755 --- a/tools/genssl +++ b/tools/genssl @@ -2,9 +2,7 @@ # # InspIRCd -- Internet Relay Chat Daemon # -# Copyright (C) 2007 Dennis Friis -# Copyright (C) 2007 Craig Edwards -# Copyright (C) 2013 Peter Powell +# Copyright (C) 2013-2017 Sadie Powell # # This file is part of InspIRCd. InspIRCd is free software: you can # redistribute it and/or modify it under the terms of the GNU General Public @@ -36,7 +34,7 @@ use File::Temp(); sub prompt($$) { my ($question, $default) = @_; - return prompt_string(1, $question, $default) if eval 'use FindBin;use lib $FindBin::RealDir;use make::console; 1'; + return prompt_string(1, $question, $default) if eval 'use File::Basename; use FindBin; use lib dirname($FindBin::RealDir); use make::console; 1'; say $question; print "[$default] => "; chomp(my $answer = );