unofficial mirror of guile-devel@gnu.org 
 help / color / mirror / Atom feed
* [PATCH] Remove redundant if in eval-string
@ 2024-06-25 11:10 Andrew Tropin
  0 siblings, 0 replies; only message in thread
From: Andrew Tropin @ 2024-06-25 11:10 UTC (permalink / raw)
  To: guile-devel; +Cc: Andrew Tropin

* module/ice-9/eval-string.scm (eval-string): If module is present, it
will be set in maybe-with-module wrapper.
---
 module/ice-9/eval-string.scm | 2 --
 1 file changed, 2 deletions(-)

diff --git a/module/ice-9/eval-string.scm b/module/ice-9/eval-string.scm
index 9cac03632..fc644c099 100644
--- a/module/ice-9/eval-string.scm
+++ b/module/ice-9/eval-string.scm
@@ -74,8 +74,6 @@
        (maybe-with-module
         module
         (lambda ()
-          (if module
-              (set-current-module module))
           (if file
               (set-port-filename! port file))
           (if line
-- 
2.45.1




^ permalink raw reply related	[flat|nested] only message in thread

only message in thread, other threads:[~2024-06-25 11:10 UTC | newest]

Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2024-06-25 11:10 [PATCH] Remove redundant if in eval-string Andrew Tropin

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).