From 52a8682c762bdc5e2e8d3a9ccc2eb527556f58ad Mon Sep 17 00:00:00 2001 From: Sean Allred Date: Fri, 2 Jan 2015 22:15:44 -0500 Subject: Message actions --- bot/sx-bot.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'bot/sx-bot.el') diff --git a/bot/sx-bot.el b/bot/sx-bot.el index e80894f..be12089 100644 --- a/bot/sx-bot.el +++ b/bot/sx-bot.el @@ -37,9 +37,11 @@ (defun sx-bot-write-to-file (data) "Write (cdr DATA) to file named (car DATA). File is savedd in `sx-bot-out-dir'." - (with-temp-file (expand-file-name (car data) sx-bot-out-dir) - (let (print-length) - (prin1 (cdr data) (current-buffer))))) + (let ((file-name (expand-file-name (car data) sx-bot-out-dir))) + (message "Writing %S" file-name) + (with-temp-file file-name + (let (print-length) + (prin1 (cdr data) (current-buffer)))))) (defun sx-bot-fetch-and-write-tags () -- cgit v1.2.3