Patch: Handle The twittering Mode Header Line When Using `j' and `k'

[Parham Doustdar <parham90@xxxxxxxxxxx>]

Hi,

Currently, when you use j and k to navigate the list of tweets, if you press k enough times, you will land on the header line. This will cause Emacspeak to say "nil: nil". This is the same if you press , (`emacspeak-twittering-speak-this-tweet').

Here is a little patch to fix that:

1 file changed, 8 insertions(+), 4 deletions(-)

lisp/emacspeak-twittering.el | 12 ++++++++----

modified   lisp/emacspeak-twittering.el

@@ -105,10 +105,14 @@ With interactive prefix arg `copy-as-kill', copy it to kill ring as well."

     (kill-new (format "%s: %s"

                       (get-text-property (point) 'username)

                       (get-text-property (point) 'text))))

-  (dtk-speak

-   (format "%s: %s"

-           (get-text-property (point) 'username)

-           (get-text-property (point) 'text))))

+  (let ((username (get-text-property (point) 'username))

+        (text (get-text-property (point) 'text)))

+    (if (and username text)

+        (dtk-speak

+         (format "%s: %s"

+                 username

+                 text))

+      (emacspeak-speak-this-face-chunk))))

 

 (cl-loop for command in

          '(twittering-goto-first-status