@@ -212,11 +212,11 @@
 							(hash-table-set! settings setting val)
 							(loop (configf:read-line inp res (calc-allow-system allow-system curr-section-name sections) settings) curr-section-name #f #f)))
 	       (configf:include-rx ( x include-file ) (let* ((curr-conf-dir (pathname-directory path))
 							     (full-conf     (if (absolute-pathname? include-file)
 										include-file
-										(nice-path 
+										(common:nice-path 
 										 (conc (if curr-conf-dir
 											   curr-conf-dir
 											   ".")
 										       "/" include-file)))))
 							(if (file-exists? full-conf)