From 76a2189eb626c4b3d7b1bd165f7bde7454f93eb7 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Thu, 9 Mar 2017 20:43:23 -0800 Subject: [PATCH] Fix missed references to parser. --- src/edwin/edwin.pkg | 2 -- src/edwin/schmod.scm | 3 +-- 2 files changed, 1 insertion(+), 4 deletions(-) diff --git a/src/edwin/edwin.pkg b/src/edwin/edwin.pkg index a6eef9604..9bfb88807 100644 --- a/src/edwin/edwin.pkg +++ b/src/edwin/edwin.pkg @@ -115,8 +115,6 @@ USA. fixed-objects-item update-fixed-objects-item!) (import (runtime parser) - (param:parser-fold-case? runtime-param:parser-fold-case?) - (param:parser-radix runtime-param:parser-radix) get-param:parser-fold-case?) (import (runtime port) (make-port make-textual-port) diff --git a/src/edwin/schmod.scm b/src/edwin/schmod.scm index b2ed4862a..3d6e28d27 100644 --- a/src/edwin/schmod.scm +++ b/src/edwin/schmod.scm @@ -266,8 +266,7 @@ The following commands evaluate Scheme expressions: (let ((completions (let ((environment (evaluation-environment #f))) (obarray-completions - (if (and bound-only? - (get-param:parser-fold-case? environment)) + (if (and bound-only? (get-param:parser-fold-case?)) (string-downcase prefix) prefix) (if bound-only? -- 2.25.1