summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2021-04-25 22:44:46 +0530
committerArun Isaac2021-04-26 00:24:00 +0530
commit822c8fb3a0f28976da068f3dc8bf607d193d0fa1 (patch)
tree3d0c79f2377b94498d6a3ed3e4e19ad9010f3026
parent03ea705f5e6162d6d9dc7417e0db14d96c5715bb (diff)
downloadccwl-822c8fb3a0f28976da068f3dc8bf607d193d0fa1.tar.gz
ccwl-822c8fb3a0f28976da068f3dc8bf607d193d0fa1.tar.lz
ccwl-822c8fb3a0f28976da068f3dc8bf607d193d0fa1.zip
Add setter for source field of <output> type.
* ccwl/ccwl.scm (<output>): Add functional setter set-output-source for source field. * .dir-locals.el (scheme-mode): Specify indentation for set-output-source.
-rw-r--r--.dir-locals.el1
-rw-r--r--ccwl/ccwl.scm2
2 files changed, 2 insertions, 1 deletions
diff --git a/.dir-locals.el b/.dir-locals.el
index 0e2f8c5..d7401e1 100644
--- a/.dir-locals.el
+++ b/.dir-locals.el
@@ -5,5 +5,6 @@
(indent-tabs-mode))
(scheme-mode
(eval put 'set-input-source 'scheme-indent-function nil)
+ (eval put 'set-output-source 'scheme-indent-function nil)
(eval put 'set-step-in 'scheme-indent-function nil)
(eval put 'lambda** 'scheme-indent-function 1)))
diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm
index 3dc3115..e173d9e 100644
--- a/ccwl/ccwl.scm
+++ b/ccwl/ccwl.scm
@@ -74,7 +74,7 @@
(id output-id)
(type output-type)
(binding output-binding)
- (source output-source)
+ (source output-source set-output-source)
(other output-other))
(define* (output id #:key (type 'File) binding source (other '()))