diff options
author | Greg J. Badros <gjb@cs.washington.edu> | 1999-12-15 16:32:36 +0000 |
---|---|---|
committer | Greg J. Badros <gjb@cs.washington.edu> | 1999-12-15 16:32:36 +0000 |
commit | e1442b11738c7e20c5ca3be9c34846db8b29b45b (patch) | |
tree | 0ba91b8320d22ad51642b186e7a8cc5aa0745964 | |
parent | 5f6d07ad97bc594e2613f3cda696cc52833feed9 (diff) | |
download | guile-e1442b11738c7e20c5ca3be9c34846db8b29b45b.tar.gz |
* doc.scm: Use `%library-dir', not the quickly defuncted
`library-dir' that I added before realizing the former existed.
Thanks Brad Knotwell!
-rw-r--r-- | ice-9/doc.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ice-9/doc.scm b/ice-9/doc.scm index 705ecd685..82db0792a 100644 --- a/ice-9/doc.scm +++ b/ice-9/doc.scm @@ -1,4 +1,4 @@ -;;; $Id: doc.scm,v 1.1 1999-12-13 03:19:11 gjb Exp $ +;;; $Id: doc.scm,v 1.2 1999-12-15 16:32:36 gjb Exp $ ;;;; Copyright (C) 1999 Free Software Foundation, Inc. ;;;; ;;;; This program is free software; you can redistribute it and/or modify @@ -35,7 +35,7 @@ (if (string? (car zz)) (display (car zz) port) (write (car zz) port)))) (define-public doc-files - (list (string-append (library-dir) "/guile-procedures.txt") + (list (string-append (%library-dir) "/guile-procedures.txt") "./guile-procedures.txt")) (define-public (hook-documentation hook) |