From 1cba0ef78f5bf337f74af8ac586a30fc03063c74 Mon Sep 17 00:00:00 2001
From: Douglas R Miles <logicmoo@gmail.com>
Date: Mon, 25 Dec 2023 01:24:11 -0800
Subject: [PATCH] fixed syntax error 3

---
 prolog/echo_source_files.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/prolog/echo_source_files.pl b/prolog/echo_source_files.pl
index 561a853..98ea33a 100755
--- a/prolog/echo_source_files.pl
+++ b/prolog/echo_source_files.pl
@@ -56,7 +56,9 @@
  ignore((
    \+ t_l:echoing_file(F),
    asserta(t_l:echoing_file(F)),!,
-   get_file_from_stream(S,F), character_count(S,Pos),
+   stream_property(S,file_name(F)),
+   %get_file_from_stream(S,F),
+   character_count(S,Pos),
    assume_caughtup_to(F,S,Pos))),!.
 
 check_current_echo:-