@@ -59,11 +59,11 @@
 (define configf:comment-rx (regexp "^\\s*#.*"))
 (define configf:cont-ln-rx (regexp "^(\\s+)(\\S+.*)$"))
 
 ;; read a line and process any #{ ... } constructs
 
-(define configf:var-expand-regex (regexp "^(.*)#\\{(scheme|system|shell|getenv|get|runconfigs-get)\\s+([^\\}\\{]*)\\}(.*)"))
+(define configf:var-expand-regex (regexp "^(.*)#\\{(scheme|system|shell|getenv|get|runconfigs-get|rget)\\s+([^\\}\\{]*)\\}(.*)"))
 (define (configf:process-line l ht)
   (let loop ((res l))
     (if (string? res)
 	(let ((matchdat (string-search configf:var-expand-regex res)))
 	  (if matchdat
@@ -81,10 +81,11 @@
 				 (let* ((parts (string-split cmd))
 					(sect  (car parts))
 					(var   (cadr parts)))
 				   (conc "(lambda (ht)(config-lookup ht \"" sect "\" \"" var "\"))")))
 				((runconfigs-get) (conc "(lambda (ht)(runconfigs-get ht \"" cmd "\"))"))
+				((rget)           (conc "(lambda (ht)(runconfigs-get ht \"" cmd "\"))"))
 				(else "(lambda (ht)(print \"ERROR\") \"ERROR\")"))))
 		;; (print "fullcmd=" fullcmd)
 		(with-input-from-string fullcmd
 		  (lambda ()
 		    (set! result ((eval (read)) ht))))
@@ -110,18 +111,26 @@
 
 ;; Lookup a value in runconfigs based on -reqtarg or -target
 (define (runconfigs-get config var)
   (let ((targ (or (args:get-arg "-reqtarg")(args:get-arg "-target"))))
     (if targ
-	(config-lookup config targ var)
-	#f)))
+	(or (configf:lookup config targ var)
+	    (configf:lookup config "default" var))
+	(configf:lookup config "default" var))))
 
 (define-inline (configf:read-line p ht allow-processing)
-  (if (and allow-processing 
-	   (not (eq? allow-processing 'return-string)))
-      (configf:process-line (read-line p) ht)
-      (read-line p)))
+  (let loop ((inl (read-line p)))
+    (if (and (string? inl)
+	     (not (string-null? inl))
+	     (equal? "\\" (string-take-right inl 1))) ;; last character is \ 
+	(let ((nextl (read-line p)))
+	  (if (not (eof-object? nextl))
+	      (loop (string-append inl nextl))))
+	(if (and allow-processing 
+		 (not (eq? allow-processing 'return-string)))
+	    (configf:process-line inl ht)
+	    inl))))
 
 ;; read a config file, returns hash table of alists
 
 ;; read a config file, returns hash table of alists
 ;; adds to ht if given (must be #f otherwise)