diff options
| author | Andy Wingo <wingo@pobox.com> | 2013-01-23 16:12:08 +0100 |
|---|---|---|
| committer | Andy Wingo <wingo@pobox.com> | 2013-01-23 16:12:08 +0100 |
| commit | 747bd5347d8b36c41809a16cb3f17b23e9afa9bf (patch) | |
| tree | c8fa343e92b5446e92b38efaa105489f4817e9be /module/system/repl/command.scm | |
| parent | d7874b91830ebb1dbfc887d5309e5fce46a87fc2 (diff) | |
| parent | faabd16157f8b55766cf890e79129c066fbc124b (diff) | |
| download | guile-747bd5347d8b36c41809a16cb3f17b23e9afa9bf.tar.gz | |
merge stable-2.0
There are some bugs with command-line handling that will be sorted out
with the next commit.
Diffstat (limited to 'module/system/repl/command.scm')
| -rw-r--r-- | module/system/repl/command.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/system/repl/command.scm b/module/system/repl/command.scm index 58d324176..aa16f5d8d 100644 --- a/module/system/repl/command.scm +++ b/module/system/repl/command.scm @@ -1,6 +1,6 @@ ;;; Repl commands -;; Copyright (C) 2001, 2009, 2010, 2011, 2012 Free Software Foundation, Inc. +;; Copyright (C) 2001, 2009, 2010, 2011, 2012, 2013 Free Software Foundation, Inc. ;; This library is free software; you can redistribute it and/or ;; modify it under the terms of the GNU Lesser General Public @@ -446,7 +446,7 @@ Change languages." (cur (repl-language repl))) (format #t "Happy hacking with ~a! To switch back, type `,L ~a'.\n" (language-title lang) (language-name cur)) - (fluid-set! *current-language* lang) + (current-language lang) (set! (repl-language repl) lang))) |