From a16341cdf93224a399d3b64a8d50c32ce4323f08 Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Wed, 7 Jan 2015 20:53:34 -0200 Subject: sx--add-answer-to-question-object returns the question --- sx-interaction.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'sx-interaction.el') diff --git a/sx-interaction.el b/sx-interaction.el index 8b72ea5..97c68b6 100644 --- a/sx-interaction.el +++ b/sx-interaction.el @@ -445,7 +445,8 @@ context at point. " (append (cdr cell) (list answer)))) ;; No previous comments, add it manually. (setcdr question (cons (car question) (cdr question))) - (setcar question `(answers . [,answer]))))) + (setcar question `(answers . [,answer]))) + question)) (provide 'sx-interaction) ;;; sx-interaction.el ends here -- cgit v1.2.3