3429 |
(setq newsticker--item-position 0)) |
(setq newsticker--item-position 0)) |
3430 |
(setq newsticker--prev-message |
(setq newsticker--prev-message |
3431 |
(nth newsticker--item-position newsticker--item-list)) |
(nth newsticker--item-position newsticker--item-list)) |
3432 |
(message newsticker--prev-message)))) |
(message "%s" newsticker--prev-message)))) |
3433 |
|
|
3434 |
(defun newsticker--display-scroll () |
(defun newsticker--display-scroll () |
3435 |
"Called from the display timer. |
"Called from the display timer. |
3465 |
(setq subtext (substring subtext 0 t-width)) |
(setq subtext (substring subtext 0 t-width)) |
3466 |
(setq t-width (1- t-width)))) |
(setq t-width (1- t-width)))) |
3467 |
;; show the ticker text and save current position |
;; show the ticker text and save current position |
3468 |
(message subtext) |
(message "%s" subtext) |
3469 |
(setq newsticker--prev-message subtext) |
(setq newsticker--prev-message subtext) |
3470 |
(setq newsticker--item-position (1+ i)) |
(setq newsticker--item-position (1+ i)) |
3471 |
(when (>= newsticker--item-position l) |
(when (>= newsticker--item-position l) |