From 730eb796bbce6f124be9194f1565b7dda1daddf1 Mon Sep 17 00:00:00 2001 From: deva Date: Tue, 1 Jun 2010 13:02:23 +0000 Subject: Afdj macros/templates are now located in their own repo. --- server/xml/macros/visus-ou-1.0.xml | 292 ------------------------------------- 1 file changed, 292 deletions(-) delete mode 100644 server/xml/macros/visus-ou-1.0.xml (limited to 'server/xml/macros/visus-ou-1.0.xml') diff --git a/server/xml/macros/visus-ou-1.0.xml b/server/xml/macros/visus-ou-1.0.xml deleted file mode 100644 index 3382b4d..0000000 --- a/server/xml/macros/visus-ou-1.0.xml +++ /dev/null @@ -1,292 +0,0 @@ - - - - function lttoxml(value) - return string.gsub(value, '<', '&lt;') - end - - out = '' - out = out .. 'Visus, o.u.' - if ( getValue('visus.ou.kontrast') ~= '' ) - then - out = out .. ', ' .. getValue('visus.ou.kontrast') .. ' kontrast' - end - if ( getValue('visus.ou.st_hul') ~= '' ) - then - out = out .. ', ' .. getValue('visus.ou.st_hul') - end - out = out .. ':\n' - if ( getValue('visus.ou.snellen') ~= '' ) - then - out = out .. 'Snellen: ' .. lttoxml(getValue('visus.ou.snellen')) .. '\n' - end - if ( getValue('visus.ou.etdrs') ~= '' ) - then - out = out .. 'ETDRS: ' .. getValue('visus.ou.etdrs') .. '\n' - end - out = out .. 'Korr.: ' .. getValue('visus.ou.korr.sf') .. ' sf' - if ( getValue('visus.ou.korr.cyl') ~= '' ) - then - out = out .. ', ' .. getValue('visus.ou.korr.cyl') .. ' cyl' - end - if ( getValue('visus.ou.korr.grader') ~= '' ) - then - out = out .. ', ' .. getValue('visus.ou.korr.grader') .. ' grader' - end - - return out - - - - - - - - - - - - - - -