GNU logs - #69686, boring messages

Message sent to bug-guix@HIDDEN:

Subject: bug#69686: Geiser is slow when running with geiser-guile-load-init-file set to t
Resent-From: Tomas Volf <~@wolfsden.cz>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-guix@HIDDEN
Resent-Date: Sun, 10 Mar 2024 01:14:02 +0000
Resent-Message-ID: <handler.69686.B.171003323131645 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
To: 69686 <at> debbugs.gnu.org
Date: Sun, 10 Mar 2024 02:13:04 +0100
From: Tomas Volf <~@wolfsden.cz>
Message-ID: <Ze0JIBx09sBwpPKD@ws>
MIME-Version: 1.0
Content-Type: multipart/signed; micalg=pgp-sha512;
 protocol="application/pgp-signature"; boundary="ql8fpCOkvfJ0CER8"
Content-Disposition: inline
Received-SPF: pass client-ip=37.205.8.62; envelope-from=~@wolfsden.cz;
 helo=wolfsden.cz
X-Spam_score_int: -20
X-Spam_score: -2.1
X-Spam_bar: --
X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1,
 DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, SPF_HELO_PASS=-0.001,
 SPF_PASS=-0.001, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Spam-Score: -1.3 (-)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -2.3 (--)


--ql8fpCOkvfJ0CER8
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline

Hello,

I discovered that when I run Geiser with geiser-guile-load-init-file set to t,
it results in horrible experience, when the REPL seems to technically work, but
anything takes a long time (completion is on order of seconds).

I found out that it is caused by the readline activation.  I am unsure how to
solve this properly.  For me the workaround was to move the readline check
inside the (unless (getenv "INSIDE_EMACS") ...), since I do not need it there.
I was contemplating sending a patch doing just so, but I realized that also
disables readline in any shell mode.  I personally do not care about that (I
only interact with guile from Emacs using Geiser, at least for now), but someone
else might care.

Ignoring the fact that disabling the colors for ansi-term (and other modes?)
might not be necessary neither, I am not sure how to write more robust check.

The patch I was considering is at the end of the email, feel free to use it if
the trade-off would be acceptable.

diff --git a/gnu/system/shadow.scm b/gnu/system/shadow.scm
index d9f13271d8..fcd1d76c18 100644
--- a/gnu/system/shadow.scm
+++ b/gnu/system/shadow.scm
@@ -215,24 +215,26 @@ (define %default-nanorc

 (define %default-dotguile
   (plain-file "dot-guile"
-              "(cond ((false-if-exception (resolve-interface '(ice-9 readline)))
-       =>
-       (lambda (module)
-         ;; Enable completion and input history at the REPL.
-         ((module-ref module 'activate-readline))))
-      (else
-       (display \"Consider installing the 'guile-readline' package for
-convenient interactive line editing and input history.\\n\\n\")))
+              ";;; -*- mode: scheme -*-

-      (unless (getenv \"INSIDE_EMACS\")
-        (cond ((false-if-exception (resolve-interface '(ice-9 colorized)))
-               =>
-               (lambda (module)
-                 ;; Enable completion and input history at the REPL.
-                 ((module-ref module 'activate-colorized))))
-              (else
-               (display \"Consider installing the 'guile-colorized' package
-for a colorful Guile experience.\\n\\n\"))))\n"))
+(unless (getenv \"INSIDE_EMACS\")
+  (cond ((false-if-exception (resolve-interface '(ice-9 readline)))
+         =>
+         (lambda (module)
+           ;; Enable completion and input history at the REPL.
+           ((module-ref module 'activate-readline))))
+        (else
+         (display \"Consider installing the 'guile-readline' package for
+convenient interactive line editing and input history.\n\n\")))
+
+  (cond ((false-if-exception (resolve-interface '(ice-9 colorized)))
+         =>
+         (lambda (module)
+           ;; Enable completion and input history at the REPL.
+           ((module-ref module 'activate-colorized))))
+        (else
+         (display \"Consider installing the 'guile-colorized' package
+for a colorful Guile experience.\n\n\"))))\n"))

 (define %default-skeleton-home-config
   (plain-file "default-home-config" "\


Have a nice day,
Tomas Volf

--
There are only two hard things in Computer Science:
cache invalidation, naming things and off-by-one errors.

--ql8fpCOkvfJ0CER8
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQIzBAEBCgAdFiEEt4NJs4wUfTYpiGikL7/ufbZ/wakFAmXtCSAACgkQL7/ufbZ/
walGjw/+KX85f6vr22hatMyIOD35OpF9kz89VoPvuq8dKZ1n60lTDzxxv52OM7W8
fc1jkCr2+3PleJ8nzHKbm8zdSW4yuXglQiZykZmsydwjqHiaaBkh2PedDoYIY3RY
6OjdGV4ujmVHQc4dD1JAHzENa92YdcdMkyPKFaSbOWnIKvuZAaGLY0ypiNedY3FO
kfejzp1Eg5AOLSgXIGj4A6PnVpwF8j6g6SwgFUy+ccN23aoPT3lUPsgFpCQQLFpv
U2SdmCh1uLws6f87FBeKb+huaxxobnNscGcQgnvcACnqpscp6xaz12w+f7X+MM3J
4BpLFuA53X3fy5BCQ9JWqBjzlaoxl/dWRSNEUi3tO0z1pX/sYsZO7Xb3XFKm9Kig
bU94NdDaUiI8sisnwa2hFaZJ3p5YxsvxlNmA/NKHVjEGa7DUbnZOHU2kMW1yzg4P
pXM+Dzu/2o4rPTxt58ymTI2wdc0IH87g4M+lz0/IbrvYwNRYT+NxblsDTV33R0tp
5zuT0aagItt5O5nCM2abiocJSs5q9UvJZEj5KSffqaXdjkxH3Ri/lfSSQVlaa8zH
lgKI4oyXzJxQjHUFZfT4+Gaxk81r7ChioBZZX+MiUxSX8iPorpc3gfuU4pbm5F1O
WvVBri5xUZDGCS/Omg2nhTfKUd53wavsDRwFNiheVFlE7R6sxLM=
=kHFO
-----END PGP SIGNATURE-----

--ql8fpCOkvfJ0CER8--

Message sent:

Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable
MIME-Version: 1.0
X-Mailer: MIME-tools 5.505 (Entity 5.505)
Content-Type: text/plain; charset=utf-8
X-Loop: help-debbugs@HIDDEN
From: help-debbugs@HIDDEN (GNU bug Tracking System)
To: Tomas Volf <~@wolfsden.cz>
Subject: bug#69686: Acknowledgement (Geiser is slow when running with
 geiser-guile-load-init-file set to t)
Message-ID: <handler.69686.B.171003323131645.ack <at> debbugs.gnu.org>
References: <Ze0JIBx09sBwpPKD@ws>
X-Gnu-PR-Message: ack 69686
X-Gnu-PR-Package: guix
Reply-To: 69686 <at> debbugs.gnu.org
Date: Sun, 10 Mar 2024 01:14:02 +0000

Thank you for filing a new bug report with debbugs.gnu.org.

This is an automatically generated reply to let you know your message
has been received.

Your message is being forwarded to the package maintainers and other
interested parties for their attention; they will reply in due course.

Your message has been sent to the package maintainer(s):
 bug-guix@HIDDEN

If you wish to submit further information on this problem, please
send it to 69686 <at> debbugs.gnu.org.

Please do not send mail to help-debbugs@HIDDEN unless you wish
to report a problem with the Bug-tracking system.

--=20
69686: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D69686
GNU Bug Tracking System
Contact help-debbugs@HIDDEN with problems

Last modified: Sun, 10 Mar 2024 01:15:02 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.