#
# old_revision [5b3eb1381b61cc37d5335b781e99f37694907e0b]
#
# patch "pf/installer.pl"
#  from [b786df3c4c2200854439edbad286f7393b019f5d]
#    to [f476a0fe011021414435d38477cb7383b586e488]
#
============================================================
--- pf/installer.pl	b786df3c4c2200854439edbad286f7393b019f5d
+++ pf/installer.pl	f476a0fe011021414435d38477cb7383b586e488
@@ -59,6 +59,7 @@ use CPAN;
 use diagnostics;
 use FindBin;
 use CPAN;
+use Term::ReadKey;
 
 my $unsupported = 0;
 my $version;
@@ -198,7 +199,9 @@ if (questioner(
         chop $mysqlAdminUser;
         $mysqlAdminUser = "root" if ( !$mysqlAdminUser );
         print "  Current Admin Password: ";
-        $mysqlAdminPass = <STDIN>;
+        ReadMode('noecho');
+        $mysqlAdminPass = ReadLine(0);
+        ReadMode('restore');
         chop $mysqlAdminPass;
         if ($mysqlAdminPass =~ /^$/) {
             print "Please set a proper root password for your MySQL instance. Exiting\n";
@@ -252,9 +255,13 @@ if (questioner(
         my $pfpass2;
         do {
             print "  Password: ";
-            $pfpass = <STDIN>;
+            ReadMode('noecho');
+            $pfpass = ReadLine(0);
+            ReadMode('restore');
             print "  Confirm: ";
-            $pfpass2 = <STDIN>;
+            ReadMode('noecho');
+            $pfpass2 = ReadLine(0); 
+            ReadMode('restore');
             chop $pfpass;
             chop $pfpass2;
         } while ( $pfpass ne $pfpass2 );