From c06587f2a905cbb23388fca5a6c1e6a3540ea057 Mon Sep 17 00:00:00 2001
From: senator <senator>
Date: Wed, 23 Sep 2009 07:25:49 +0000
Subject: split visus macros out into 4 different macros

---
 server/xml/macros/visus-uden_korr-1.0.xml | 40 +++++++++++++++----------------
 1 file changed, 19 insertions(+), 21 deletions(-)

(limited to 'server/xml/macros/visus-uden_korr-1.0.xml')

diff --git a/server/xml/macros/visus-uden_korr-1.0.xml b/server/xml/macros/visus-uden_korr-1.0.xml
index bcc812b..198b13d 100644
--- a/server/xml/macros/visus-uden_korr-1.0.xml
+++ b/server/xml/macros/visus-uden_korr-1.0.xml
@@ -1,23 +1,21 @@
 <?xml version='1.0' encoding='UTF-8'?>
-<macro name="visus_uden_korr" version="1.0">
+<macro name="visus-uden_korr" version="1.0">
   <resume language="lua">
     out = ''
-    if ( getValue('visus.uden_korr.snellen.right.missing') == '' or getValue('visus.uden_korr.snellen.left.missing') == '' )
+    if ( getValue('visus.uden_korr.missing.right') == '' )
     then
-      out = out .. 'Synsstyrke uden korrektion:\n'
+      out = out .. 'Visus, højre øje:\n'
+      out = out .. 'Snellen: ' .. getValue('visus.uden_korr.snellen.right') .. '\n'
+      out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.etdrs.right') .. '\n'
+    end
 
-      if ( getValue('visus.uden_korr.snellen.right.missing') == '' )
-      then
-        out = out .. 'Snellen højre øje: ' .. getValue('visus.uden_korr.snellen.right') .. '\n'
-        out = out .. 'ETDRS højre øje: ' .. getValue('visus.uden_korr.etdrs.right') .. '\n'
-      end
-  
-      if ( getValue('visus.uden_korr.snellen.left.missing') == '' )
-      then
-        out = out .. 'Snellen venstre øje: ' .. getValue('visus.uden_korr.snellen.left') .. '\n'
-        out = out .. 'ETDRS venstre øje: ' .. getValue('visus.uden_korr.etdrs.left') .. '\n'
-      end
+    if ( getValue('visus.uden_korr.missing.left') == '' )
+    then
+      out = out .. 'Visus, venstre øje:\n'
+      out = out .. 'Snellen: ' .. getValue('visus.uden_korr.snellen.left') .. '\n'
+      out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.etdrs.left') .. '\n'
     end
+
     return out
   </resume>
   <queries>
@@ -135,7 +133,7 @@
       return true
     </script>
   </scripts>
-  <widgets caption="Visus uden korrektion"
+  <widgets caption="Visus - uden korrektion"
           layout="vbox">
 
     <frame layout="hbox">
@@ -143,7 +141,7 @@
       <!-- Højre øje -->
       <frame layout="vbox">
 	<checkbox caption="Der er ikke målt på højre øje"
-		  name="visus.uden_korr.snellen.right.missing" script="right_eye"
+		  name="visus.uden_korr.missing.right" script="right_eye"
 		  map="missing_eye_right_map"
 		  truevalue="mangler" falsevalue="" value=""/>
 	<frame name="right_eye_frame" caption="Højre øje" layout="vbox">
@@ -297,11 +295,11 @@
 	  </frame>
 	</frame>
       </frame>
-
+      
       <!-- Venstre øje -->
       <frame layout="vbox">
 	<checkbox caption="Der er ikke målt på venstre øje"
-		  name="visus.uden_korr.snellen.left.missing" script="left_eye"
+		  name="visus.uden_korr.missing.left" script="left_eye"
 		  map="missing_eye_left_map"
 		  truevalue="mangler" falsevalue="" value=""/>
 	<frame name="left_eye_frame" caption="Venstre øje" layout="vbox">
@@ -338,9 +336,9 @@
 	      <item caption="+L+P" value="+L+P"/>
 	      <item caption="+L-P" value="+L-P"/>
 	      <item caption="-L" value="-L"/>
-	      <altitem caption="Andet" value="andet" innerwidget="venstre_snellen_andet" layout="hbox">
+	      <altitem caption="Andet" value="andet" innerwidget="hoejre_snellen_andet" layout="hbox">
 		<label caption="Andet:"/>
-		<lineedit name="venstre_snellen_andet" regexp="[0-9]+(,\d+|\d*)"/>
+		<lineedit name="hoejre_snellen_andet" regexp="[0-9]+(,\d+|\d*)"/>
 	      </altitem>
 	    </altcombobox>
 	  </frame>
@@ -452,7 +450,7 @@
 	    </combobox>
 	    <spacer/>
 	  </frame>
-	</frame>
+	  </frame>
 	</frame>
       </frame>
 
-- 
cgit v1.2.3