diff options
| author | Arun Isaac | 2021-07-04 19:49:41 +0530 |
|---|---|---|
| committer | Arun Isaac | 2021-07-04 19:49:41 +0530 |
| commit | 626e0505a1db105b65bea85e254f01ae9349dc44 (patch) | |
| tree | 8e853230ce09ee78743b7325c8f34b0c8c2a6435 /doc | |
| parent | 3ca3bd1022b16c26811af86d48a85e9e74f2c00a (diff) | |
| download | ccwl-626e0505a1db105b65bea85e254f01ae9349dc44.tar.gz ccwl-626e0505a1db105b65bea85e254f01ae9349dc44.tar.lz ccwl-626e0505a1db105b65bea85e254f01ae9349dc44.zip | |
doc: Search for source-ref referenced files in source-path.
* doc/skribilo.scm: Import (skribilo parameters).
(source-ref): Search for files in source-path.
Diffstat (limited to 'doc')
| -rw-r--r-- | doc/skribilo.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/doc/skribilo.scm b/doc/skribilo.scm index 3438b82..4a5d0c1 100644 --- a/doc/skribilo.scm +++ b/doc/skribilo.scm @@ -31,6 +31,7 @@ #:use-module (skribilo engine) #:use-module (skribilo lib) #:use-module (skribilo package base) + #:use-module (skribilo parameters) #:use-module (skribilo source lisp) #:use-module (skribilo utils keywords) #:use-module (skribilo writer) @@ -108,7 +109,8 @@ and END are line numbers indexed from 1." (position->line-number str end)))))) (define (source-ref file regexp text) - (ref #:url (match (sexp-file-lines file regexp) + (ref #:url (match (sexp-file-lines (search-path (*source-path*) file) + regexp) ((start-line . end-line) (if (= start-line end-line) (string-append %source-uri-base |