From 79b0aae5ffccbc71a2654fda7119f2c3d007c5d8 Mon Sep 17 00:00:00 2001 From: Nick Horelik Date: Fri, 9 Mar 2012 16:55:50 -0500 Subject: [PATCH] minor bugfix to plot slice xml parsing for mask elements --- src/input_xml.F90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/input_xml.F90 b/src/input_xml.F90 index b19c5b4a86..285e9974e4 100644 --- a/src/input_xml.F90 +++ b/src/input_xml.F90 @@ -1260,11 +1260,11 @@ contains end do ! Alter colors based on mask information - if (size(plot_(i) % mask_) /= 1) then + if (size(plot_(i) % mask_) > 1) then message = "Mutliple masks" // & " specified in plot " // trim(to_str(pl % id)) call fatal_error() - else + else if (.not. size(plot_(i) % mask_) == 0) then do j=1,size(pl % colors) if (.not. any(j .eq. plot_(i) % mask_(1) % components)) then pl % colors(j) % rgb = plot_(i) % mask_(1) % background