Changeset 1997

Timestamp:

04/27/17 13:55:23 (7 years ago)

Author:

nanardon

Message:

Fix la-passwd when input is STDIN

File:

• trunk/LATMOS-Accounts/bin/la-passwd (modified) (1 diff)

trunk/LATMOS-Accounts/bin/la-passwd

@@ -112 +112 @@
     my $handle;
     if ($input eq '-') {
-        $input = \*STDIN;
+        $handle = \*STDIN;
     } else {
         open($handle, '<', $input) or die "Cannot open $input: $!\n";