From add040c2784f0f821389a99c4545b597e97ffed7 Mon Sep 17 00:00:00 2001
From: Ole Tange <ole@tange.dk>
Date: Sat, 14 Jan 2012 00:57:48 +0100
Subject: [PATCH] parallel: --slf . now reads /etc/parallel/sshloginfile

---
 src/parallel     | 3 +++
 src/parallel.pod | 7 +++++--
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/src/parallel b/src/parallel
index d148dbff..651c26ae 100755
--- a/src/parallel
+++ b/src/parallel
@@ -1490,6 +1490,9 @@ sub read_sshloginfile {
     if($file eq "..") {
         $file = $ENV{'HOME'}."/.parallel/sshloginfile";
     }
+    if($file eq ".") {
+        $file = "/etc/parallel/sshloginfile";
+    }
     if($file eq "-") {
 	*IN = *STDIN;
 	$close = 0;
diff --git a/src/parallel.pod b/src/parallel.pod
index 65b651e2..57d97aa2 100644
--- a/src/parallel.pod
+++ b/src/parallel.pod
@@ -1113,9 +1113,9 @@ B<--sshlogin> is often used with B<--transfer>, B<--return>,
 B<--cleanup>, and B<--trc>.
 
 
-=item B<--sshloginfile> I<filename>
+=item B<--sshloginfile> I<filename> (alpha testing)
 
-=item B<--slf> I<filename>
+=item B<--slf> I<filename> (alpha testing)
 
 File with sshlogins. The file consists of sshlogins on separate
 lines. Empty lines and lines starting with '#' are ignored. Example:
@@ -1143,6 +1143,9 @@ Multiple B<--sshloginfile> are allowed.
 The sshloginfile '..' is special, it read sshlogins from
 ~/.parallel/sshloginfile
 
+The sshloginfile '.' is special, it read sshlogins from
+/etc/parallel/sshloginfile
+
 The sshloginfile '-' is special, too, it read sshlogins from stdin
 (standard input).