- md5ify password before deleting files

1 files changed, 1 insertions, 1 deletions

diff --git a/mdkonline b/mdkonline
index bb434ae0..7cf99067 100755
--- a/mdkonline
+++ b/mdkonline
@@ -279,7 +279,7 @@ sub final {
 sub getNames {
     my ($login, $passwd, $machine) = @_;
     $login = $o->{login}->get_text;
-    $passwd = $o->{passwd}->get_text;
+    $passwd = md5_hex($o->{passwd}->get_text);
     $machine = $o->{machine}->get_text;
     ($login, $passwd, $machine)
 }