diff options
Diffstat (limited to 'src/wasp-bus.el')
| -rw-r--r-- | src/wasp-bus.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/src/wasp-bus.el b/src/wasp-bus.el index aa950b29..cc75a26c 100644 --- a/src/wasp-bus.el +++ b/src/wasp-bus.el @@ -80,11 +80,12 @@ (defun w/pub (ev &optional d) "Publish the data D to the event EV." - (process-send-string - w/bus-process - (s-concat - (format "%S" `(pub ,ev ,@d)) - "\n"))) + (let ((s (s-concat (format "%S" `(pub ,ev ,@d)) "\n"))) + (w/write-log (format "sending: %s" s)) + (process-send-string + w/bus-process + s + ))) (defun w/sub-all () "Subscribe to all events in `w/bus-event-handlers'." |
