mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
Fix erroneous quotation in scheme string of last commit
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@19310 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
parent
f4a684f0fd
commit
84d8a07dc5
@ -76,7 +76,7 @@
|
|||||||
;; list of files in the directory
|
;; list of files in the directory
|
||||||
|
|
||||||
(define (directory-files dir)
|
(define (directory-files dir)
|
||||||
(let ((fname-regexp (make-regexp "\.scm$")) ;; Regexp that matches the desired filenames
|
(let ((fname-regexp (make-regexp "\\.scm$")) ;; Regexp that matches the desired filenames
|
||||||
(dir-stream (opendir dir)))
|
(dir-stream (opendir dir)))
|
||||||
(let loop ((fname (readdir dir-stream))
|
(let loop ((fname (readdir dir-stream))
|
||||||
(acc '())
|
(acc '())
|
||||||
|
Loading…
Reference in New Issue
Block a user