From 370ff5d5b41f931f7a9def82ecd8309dd75db0e0 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Sun, 14 Sep 2003 00:20:42 +0000
Subject: [PATCH] Strip double-quote characters from path elements.

---
 v7/src/runtime/ntprm.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/v7/src/runtime/ntprm.scm b/v7/src/runtime/ntprm.scm
index 75672d06d..7fdf2f88e 100644
--- a/v7/src/runtime/ntprm.scm
+++ b/v7/src/runtime/ntprm.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: ntprm.scm,v 1.40 2003/02/14 18:28:33 cph Exp $
+$Id: ntprm.scm,v 1.41 2003/09/14 00:20:42 cph Exp $
 
 Copyright 1995,1996,1998,1999,2000,2001 Massachusetts Institute of Technology
 Copyright 2003 Massachusetts Institute of Technology
@@ -665,7 +665,8 @@ USA.
 	    (if index
 		(if (= index start)
 		    (loop (+ index 1))
-		    (cons (substring string start index)
+		    (cons (string-trim (substring string start index)
+				       (char-set #\"))
 			  (loop (+ index 1))))
 		(list (substring string start end))))
 	  '()))))
-- 
2.25.1