diff options
-rw-r--r-- | sx-compose.el | 3 | ||||
-rw-r--r-- | sx-interaction.el | 1 |
2 files changed, 3 insertions, 1 deletions
diff --git a/sx-compose.el b/sx-compose.el index 5201435..ab4a58d 100644 --- a/sx-compose.el +++ b/sx-compose.el @@ -149,7 +149,8 @@ respectively added locally to `sx-compose-before-send-hook' and (error "Invalid PARENT")) (let ((is-question (and (listp parent) - (cdr (assoc 'title parent))))) + (or (null parent) + (cdr (assoc 'title parent)))))) (with-current-buffer (sx-compose--get-buffer-create site parent) (sx-compose-mode) (setq sx-compose--send-function diff --git a/sx-interaction.el b/sx-interaction.el index 2768c8d..372a5b1 100644 --- a/sx-interaction.el +++ b/sx-interaction.el @@ -345,6 +345,7 @@ from context at point." (sx-site-get-api-tokens) nil t nil nil default))) +;;;###autoload (defun sx-ask (site) "Start composing a question for SITE. SITE is a string, indicating where the question will be posted." |