From c78c50bb38135dae6ce4b8c696390a4f33980c01 Mon Sep 17 00:00:00 2001
From: Ferdi Franceschini <ffr@ansto.gov.au>
Date: Wed, 8 Nov 2006 17:01:13 +1100
Subject: [PATCH] Use lowercase for instrument names.

r1258 | ffr | 2006-11-08 17:01:13 +1100 (Wed, 08 Nov 2006) | 2 lines
---
 site_ansto/instrument/hipadaba/gen_hpdbxml.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/site_ansto/instrument/hipadaba/gen_hpdbxml.tcl b/site_ansto/instrument/hipadaba/gen_hpdbxml.tcl
index 7facadd6..4b25136d 100755
--- a/site_ansto/instrument/hipadaba/gen_hpdbxml.tcl
+++ b/site_ansto/instrument/hipadaba/gen_hpdbxml.tcl
@@ -9,7 +9,7 @@ array set accesscode [list 0 READ_ONLY 1 MANAGER 2 USER 3 SPY ];
 
 proc genXML {instrument} {
   global doc;
-  array set instPath [list Echidna hrpd Wombat hipd Koala qld Quokka sans Platypus reflectometer Pelican pas Taipan tas];
+  array set instPath [list echidna hrpd wombat hipd koala qld quokka sans platypus reflectometer pelican pas taipan tas];
 
   instrumentXML $instrument;
   source $instPath($instrument)/hipadaba_configuration.tcl;