[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.11-74-g3a331

From: Mark H Weaver
Subject: [Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.11-74-g3a3316e
Date: Mon, 22 Sep 2014 03:25:41 +0000

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

The branch, stable-2.0 has been updated
       via  3a3316e200ac49f0e8e9004c233747efd9f54a04 (commit)
      from  76a8db27c65b59879a8c27363f374035b233d6b7 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 3a3316e200ac49f0e8e9004c233747efd9f54a04
Author: David Michael <address@hidden>
Date:   Sun Sep 21 23:21:25 2014 -0400

    guile-readline: Use the current directory if HOME is unset.
    * guile-readline/ice-9/readline.scm (history-file): When the HOME
      environment variable is unset, use the current directory instead.


Summary of changes:
 guile-readline/ice-9/readline.scm |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/guile-readline/ice-9/readline.scm 
index cfaaef3..2142fbf 100644
--- a/guile-readline/ice-9/readline.scm
+++ b/guile-readline/ice-9/readline.scm
@@ -118,7 +118,8 @@
 (define-once the-readline-port #f)
 (define-once history-variable "GUILE_HISTORY")
-(define-once history-file (string-append (getenv "HOME") "/.guile_history"))
+(define-once history-file
+  (string-append (or (getenv "HOME") ".") "/.guile_history"))
 (define-public readline-port
   (let ((do (lambda (r/w)

GNU Guile

reply via email to

[Prev in Thread] Current Thread [Next in Thread]