[latex3-commits] [git/LaTeX3-latex3-latex3] master: Better test for images without ext gaining .tex (ffebf74)

[Joseph Wright]

Repository : https://github.com/latex3/latex3
On branch  : master
Link       : https://github.com/latex3/latex3/commit/ffebf74c1799d1e6e8384beb4315caacf7a2d762

>---------------------------------------------------------------

commit ffebf74c1799d1e6e8384beb4315caacf7a2d762
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Wed May 8 20:10:56 2019 +0100

    Better test for images without ext gaining .tex


>---------------------------------------------------------------

ffebf74c1799d1e6e8384beb4315caacf7a2d762
 l3experimental/l3image/l3image.dtx |   25 +++----------------------
 1 file changed, 3 insertions(+), 22 deletions(-)

diff --git a/l3experimental/l3image/l3image.dtx b/l3experimental/l3image/l3image.dtx
index 145a869..4e5917b 100644
--- a/l3experimental/l3image/l3image.dtx
+++ b/l3experimental/l3image/l3image.dtx
@@ -511,32 +511,13 @@
       \seq_set_eq:NN \l_file_search_path_seq \l_image_search_path_seq
       \file_get_full_name:nNTF {#1} \l_@@_name_tl
         {
-          \use:x
-            {
-              \cs_set_protected:Npn \@@_include_check:w
-                ####1 #1 \tl_to_str:n { .tex }
-                ####2 #1 \tl_to_str:n { .tex }
-                ####3
-                \exp_not:N \q_stop
-            }
-            {
-              \tl_if_blank:nTF {##3}
-                { \@@_include_search:n {#1} }
-                { \@@_include: }
-            }
-          \use:x
-            {
-              \@@_include_check:w
-                \l_@@_name_tl
-                #1 \tl_to_str:n { .tex }
-                #1 \tl_to_str:n { .tex }
-                \exp_not:N \q_stop
-            }
+          \str_if_eq:eeTF { \l_@@_name_tl } { #1 .tex }
+            { \@@_include_search:n {#1} }
+            { \@@_include: }
         }
         { \@@_include_search:n {#1} }
     \group_end:
   }
-\cs_new_protected:Npn \@@_include_check:w { }
 \cs_new_protected:Npn \@@_include_search:n #1
   {
     \seq_map_inline:Nn \l_image_search_ext_seq