diff --git a/docs/source/usersguide/troubleshoot.rst b/docs/source/usersguide/troubleshoot.rst
index ba7e4405cc..10ac12184f 100644
--- a/docs/source/usersguide/troubleshoot.rst
+++ b/docs/source/usersguide/troubleshoot.rst
@@ -79,14 +79,6 @@ with the :envvar:`CROSS_SECTIONS` environment variable. It is recommended to add
 a line in your ``.profile`` or ``.bash_profile`` setting the
 :envvar:`CROSS_SECTIONS` environment variable.
 
-ERROR: Invalid usage of L(I) in ACE data; Consider using more recent data set.
-******************************************************************************
-
-The cross-sections requested in ``materials.xml`` do not conform to the current
-standard format.  This typically happens with fissionable nuclides in a ``.6*c``
-library as distributed with MCNP.  Please try a newer library such as any from
-the ``.7*c`` set.
-
 Geometry Debugging
 ******************
 
diff --git a/src/ace.F90 b/src/ace.F90
index 0c1d519d3a..d414e21f89 100644
--- a/src/ace.F90
+++ b/src/ace.F90
@@ -982,7 +982,7 @@ contains
         ! If this is the case, we should skip incrementing length when it is
         ! not needed.
         if (i < NE) then
-          if (L(i) == L(i + 1)) then
+          if (any(L(i) == L(i + 1: NE))) then
             ! adjust location for this block
             j = lc + 2 + 2*NR + NE + i
             XSS(j) = XSS(j) - LOCC - lid
@@ -1040,7 +1040,7 @@ contains
         ! If this is the case, we should skip incrementing length when it is
         ! not needed.
         if (i < NE) then
-          if (L(i) == L(i + 1)) then
+          if (any(L(i) == L(i + 1: NE))) then
             ! adjust location for this block
             j = lc + 2 + 2*NR + NE + i
             XSS(j) = XSS(j) - LOCC - lid
@@ -1070,7 +1070,7 @@ contains
         ! If this is the case, we should skip incrementing length when it is
         ! not needed.
         if (i < NE) then
-          if (L(i) == L(i + 1)) then
+          if (any(L(i) == L(i + 1: NE))) then
             ! adjust locators for energy distribution
             j = lc + 2 + 2*NR + NE + i
             XSS(j) = XSS(j) - LOCC - lid
diff --git a/tests/test_source_file/results_true.dat b/tests/test_source_file/results_true.dat
index d714d0bd43..eb3139f582 100644
--- a/tests/test_source_file/results_true.dat
+++ b/tests/test_source_file/results_true.dat
@@ -1,2 +1,2 @@
 k-combined:
-3.013216E-01 2.768871E-03
+3.037843E-01 4.395619E-03