From c0f9b7641a564d918b53119118888a9162533e2f Mon Sep 17 00:00:00 2001
From: ian <ian>
Date: Fri, 5 Jul 2002 10:50:13 +0000
Subject: [PATCH] Add marple

---
 config                            | 4 ++++
 files/_.configs_setenvir          | 3 +++
 files/personal_scripts_bin_xloadt | 2 +-
 3 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/config b/config
index b150190..83fa181 100644
--- 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 ?";
 }
diff --git a/files/_.configs_setenvir b/files/_.configs_setenvir
index a07504c..0a651b8 100755
--- a/files/_.configs_setenvir
+++ b/files/_.configs_setenvir
@@ -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
diff --git a/files/personal_scripts_bin_xloadt b/files/personal_scripts_bin_xloadt
index b019a29..51f2974 100755
--- a/files/personal_scripts_bin_xloadt
+++ b/files/personal_scripts_bin_xloadt
@@ -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) {
-- 
2.30.2