From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 2 Apr 2018 00:38:03 +0000 (-0700)
Subject: Downcase more symbols and constants.
X-Git-Tag: mit-scheme-pucked-x11-0.3.1~7^2~139
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=8b705c2b2039914e619584a9ca3a9e4e7febc343;p=mit-scheme.git

Downcase more symbols and constants.
---

diff --git a/src/etc/optiondb.scm b/src/etc/optiondb.scm
index 3938d8aeb..19db05a4d 100644
--- a/src/etc/optiondb.scm
+++ b/src/etc/optiondb.scm
@@ -57,7 +57,7 @@ USA.
 	   (lambda (dir pathname)
 	     (with-working-directory-pathname dir
 	       (lambda ()
-		 (load pathname '(RUNTIME))))))
+		 (load pathname '(runtime))))))
 	  (lose (lambda () (error "Unable to find package directory:" place))))
       (lambda ()
 	(if (not (name->package package-name))