chiark / gitweb /
Add marple
authorian <ian>
Fri, 5 Jul 2002 10:50:13 +0000 (10:50 +0000)
committerian <ian>
Fri, 5 Jul 2002 10:50:13 +0000 (10:50 +0000)
config
files/_.configs_setenvir
files/personal_scripts_bin_xloadt

diff --git a/config b/config
index b150190..83fa181 100644 (file)
--- a/config
+++ b/config
@@ -18,6 +18,10 @@ if ($uname =~ m/^Linux$/) {
     m/^\d+\.\d+/ or die "$_ ?";
     $platform= "SunOS$&";
     $xbindir= '/usr/openwin/bin';
+} elsif ($uname =~ m/^HP\-UX/) {
+    chomp($_= `uname -r`); $? and die "platform $?";
+    m/^B\.(\d+\.\d+)$/ or die "$_ ?";
+    $platform= "HP-UX$1";
 } else {
     die "$uname ?";
 }
index a07504c..0a651b8 100755 (executable)
@@ -8,6 +8,9 @@ PATH=$PATH:$HOME/personal/crypto/scripts
 @@? -d '/opt/bin' ?@@@@#
 PATH=$PATH:/opt/bin
 @@;@@#
+@@? $uname eq 'HP-UX' ?@@@@#
+PATH=$PATH:/usr/contrib/bin
+@@;@@#
 PATH=$PATH:/usr/local/bin:/bin:/usr/bin:/usr/local/sbin:/sbin:/usr/sbin
 @@? $uname eq 'SunOS' ?@@@@#
 PATH=$PATH:/usr/ccs/bin
index b019a29..51f2974 100755 (executable)
@@ -6,7 +6,7 @@ xlsclients | egrep \
 xload -geometry 120x120+@@
 
 @hostlist= ($ncipher eq 'bos' ? qw(viking dover pell arrakis) :
-            $ncipher eq 'cam' ? qw(jura islay dover dounreay) :
+            $ncipher eq 'cam' ? qw(jura islay dover dounreay marple) :
             qw(davenant anarres));
 for ($i=0; $i<@hostlist; $i++) { last if $hostlist[$i] eq $nodename; }
 if ($i>=@hostlist) {