From 7320355e0c746e31aca91051758cc15499624b0c Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Sat, 29 Nov 2014 21:21:32 +0000 Subject: Woops. Fix swallowing one function inside the other. --- sx-question-print.el | 14 +++----------- 1 file changed, 3 insertions(+), 11 deletions(-) diff --git a/sx-question-print.el b/sx-question-print.el index 22f857c..ebdba56 100644 --- a/sx-question-print.el +++ b/sx-question-print.el @@ -394,19 +394,11 @@ URL is used as 'help-echo and 'url properties." ;; For visiting and stuff. 'sx-button-url url 'sx-button-copy url - :type 'sx-button-link) + :type 'sx-button-link)) - (defun sx-question-mode-find-reference (id &optional fallback-id) - "Find url identified by reference ID in current buffer. +(defun sx-question-mode-find-reference (id &optional fallback-id) + "Find url identified by reference ID in current buffer. If ID is nil, use FALLBACK-ID instead." - (save-excursion - (save-match-data - (goto-char (point-min)) - (when (search-forward-regexp - (format sx-question-mode--reference-regexp - (or id fallback-id)) - nil t) - (match-string-no-properties 1)))))) (defun sx-question-mode--move-over-pre () "Non-nil if paragraph at point can be filled." -- cgit v1.2.3