Index: configf.scm
==================================================================
--- configf.scm
+++ configf.scm
@@ -58,22 +58,22 @@
   (hash-table-set! cfgdat section-name
 		   (configf:assoc-safe-add
 		    (hash-table-ref/default cfgdat section-name '())
 		    var value metadata: metadata)))
 
-(define (configf:eval-string-in-environment str)
-  ;; (if (or (string-null? str)
-  ;;	  (equal? "!" (substring str 0 1))) ;; null string or starts with ! are preserved but NOT set in the environment
+;; The if was disabled, but why?
+  (if (or (string-null? str)
+  	  (equal? "!" (substring str 0 1))) ;; null string or starts with ! are preserved but NOT set in the environment
       str
       (handle-exceptions
-       exn
-       (begin
-	 (debug:print-error 0 *default-log-port* "problem evaluating \"" str "\" in the shell environment, exn=" exn)
-	 #f)
-       (let ((cmdres (process:cmd-run->list (conc "echo " str))))
-	 (if (null? cmdres) ""
-	     (caar cmdres))))) ;; )
+	  exn
+	  (begin
+	    (debug:print-error 0 *default-log-port* "problem evaluating \"" str "\" in the shell environment, exn=" exn)
+	    #f)
+	(let ((cmdres (process:cmd-run->list (conc "echo " str))))
+	  (if (null? cmdres) ""
+	      (caar cmdres))))))
 
 ;;======================================================================
 ;; Make the regexp's needed globally available
 ;;======================================================================