2002-11-05 Frank Ch. Eigler <fche@redhat.com>

	* dev.scm: Call getenv with a string, not a symbol.

diff --git a/cgen/ChangeLog b/cgen/ChangeLog
index a27b627..c4b9d72 100644 (file)
--- a/cgen/ChangeLog
+++ b/cgen/ChangeLog
@@ -1,3 +1,7 @@
+2002-11-05  Frank Ch. Eigler  <fche@redhat.com>
+
+       * dev.scm: Call getenv with a string, not a symbol.
+
 2002-10-08  Doug Evans  <dje@transmeta.com>
            Hans-Peter Nilsson  <hp@axis.com>
 

diff --git a/cgen/dev.scm b/cgen/dev.scm
index c2b9b3f..b76831a 100644 (file)
--- a/cgen/dev.scm
+++ b/cgen/dev.scm
@@ -189,7 +189,7 @@ sid options:
 
 ; If ~/.cgenrc exists, load it.
 
-(let ((cgenrc (string-append (getenv 'HOME) "/.cgenrc")))
+(let ((cgenrc (string-append (getenv "HOME") "/.cgenrc")))
   (if (file-exists? cgenrc)
       (load cgenrc))
 )