@@ -541,13 +541,10 @@
   (let ((sectdat (hash-table-ref/default cfgdat section '())))
     (if (null? sectdat)
 	'()
 	(map car sectdat))))
 
-(define (configf:get-section cfgdat section)
-  (hash-table-ref/default cfgdat section '()))
-
 (define (configf:set-section-var cfgdat section var val)
   (let ((sectdat (configf:get-section cfgdat section)))
     (hash-table-set! cfgdat section
                      (config:assoc-safe-add sectdat var val))))