Megatest

Diff
Login

Differences From Artifact [6dc90d09ba]:

To Artifact [4f26f42f5f]:


39
40
41
42
43
44
45
46

47
48
	    (let ((match (assoc var sectdat)))
	      (if match ;; (and match (list? match)(> (length match) 1))
		  (cadr match)
		  #f))
	    ))
      #f))




)







|
>


39
40
41
42
43
44
45
46
47
48
49
	    (let ((match (assoc var sectdat)))
	      (if match ;; (and match (list? match)(> (length match) 1))
		  (cadr match)
		  #f))
	    ))
      #f))

(define (configf:get-section cfgdat section)
  (hash-table-ref/default cfgdat section '()))

)