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

[Mark H Weaver]

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".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=3a3316e200ac49f0e8e9004c233747efd9f54a04

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 
b/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)


hooks/post-receive
-- 
GNU Guile