diff --git a/ChangeLog b/ChangeLog index cb192ddf..ec54d330 100644 --- a/ChangeLog +++ b/ChangeLog @@ -8,6 +8,9 @@ (twittering-get-timeline-spec-string-from-process): new function for registered timeline spec string. + * twittering-mode.el (twittering-http-get-default-sentinel): + display the timeline spec string in notification. + 2010-03-23 Tadashi MATSUO * twittering-mode.el (twittering-mode-map): bind "SPC" and "C-v" to diff --git a/twittering-mode.el b/twittering-mode.el index aa79a013..7bc6d0b8 100644 --- a/twittering-mode.el +++ b/twittering-mode.el @@ -2014,7 +2014,8 @@ Available keywords: status-code (("200") (let* ((spec (twittering-get-timeline-spec-from-process proc)) - (spec-string (twittering-timeline-spec-to-string spec)) + (spec-string + (twittering-get-timeline-spec-string-from-process proc)) (statuses (twittering-get-status-from-http-response spec (process-buffer proc)))) (when statuses @@ -2029,7 +2030,7 @@ Available keywords: (twittering-render-timeline t new-statuses)) (twittering-add-timeline-history))) (if twittering-notify-successful-http-get - (if suc-msg suc-msg "Success: Get.") + (if suc-msg suc-msg (format "Success: Get %s." spec-string)) nil))) (t (let ((error-mes (twittering-get-error-message (process-buffer proc))))