From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:4830:134:3::10]:36223) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1gR1DD-0004b3-6q for guix-patches@gnu.org; Sun, 25 Nov 2018 15:41:03 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1gR1DC-0003PZ-J9 for guix-patches@gnu.org; Sun, 25 Nov 2018 15:41:03 -0500 Received: from debbugs.gnu.org ([208.118.235.43]:43380) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1gR1DC-0003PT-GH for guix-patches@gnu.org; Sun, 25 Nov 2018 15:41:02 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1gR1DC-0007kC-2B for guix-patches@gnu.org; Sun, 25 Nov 2018 15:41:02 -0500 Subject: [bug#33466] [PATCH 2/2] repl: Add 'colorized' and 'readline' support. Resent-Message-ID: From: ludo@gnu.org (Ludovic =?UTF-8?Q?Court=C3=A8s?=) References: <20181122144228.31573-1-go.wigust@gmail.com> <20181122144228.31573-2-go.wigust@gmail.com> Date: Sun, 25 Nov 2018 21:40:50 +0100 In-Reply-To: <20181122144228.31573-2-go.wigust@gmail.com> (Oleg Pykhalov's message of "Thu, 22 Nov 2018 17:42:28 +0300") Message-ID: <874lc4vqjx.fsf@gnu.org> MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: Oleg Pykhalov Cc: 33466@debbugs.gnu.org Oleg Pykhalov skribis: > * guix/scripts/repl.scm (guix-repl): Add 'colorized' and 'readline' suppo= rt. > --- > guix/scripts/repl.scm | 17 +++++++++++++++++ > 1 file changed, 17 insertions(+) > > diff --git a/guix/scripts/repl.scm b/guix/scripts/repl.scm > index 1a105f51e..eeaf4acc4 100644 > --- a/guix/scripts/repl.scm > +++ b/guix/scripts/repl.scm > @@ -188,6 +188,23 @@ call THUNK." > (save-module-excursion > (lambda () > (set-current-module user-module) > + (cond ((false-if-exception (resolve-interface '(ice-9 re= adline))) > + =3D> > + (lambda (module) > + ;; Enable completion and input history at the R= EPL. > + ((module-ref module 'activate-readline)))) What about simply loading ~/.guile when it exists? Ludo=E2=80=99.