emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/net/newsticker.el


From: D . Goel
Subject: [Emacs-diffs] Changes to emacs/lisp/net/newsticker.el
Date: Sun, 18 Sep 2005 08:36:09 -0400

Index: emacs/lisp/net/newsticker.el
diff -c emacs/lisp/net/newsticker.el:1.3 emacs/lisp/net/newsticker.el:1.4
*** emacs/lisp/net/newsticker.el:1.3    Tue Sep 13 08:47:44 2005
--- emacs/lisp/net/newsticker.el        Sun Sep 18 12:36:08 2005
***************
*** 10,16 ****
  ;; Created:     17. June 2003
  ;; Keywords:    News, RSS
  ;; Time-stamp:  "26. August 2005, 16:33:46 (ulf)"
! ;; CVS-Version: $Id: newsticker.el,v 1.3 2005/09/13 08:47:44 lektu Exp $
  
  (defconst newsticker-version "1.8" "Version number of newsticker.el.")
  
--- 10,16 ----
  ;; Created:     17. June 2003
  ;; Keywords:    News, RSS
  ;; Time-stamp:  "26. August 2005, 16:33:46 (ulf)"
! ;; CVS-Version: $Id: newsticker.el,v 1.4 2005/09/18 12:36:08 deego Exp $
  
  (defconst newsticker-version "1.8" "Version number of newsticker.el.")
  
***************
*** 3429,3435 ****
          (setq newsticker--item-position 0))
        (setq newsticker--prev-message
              (nth newsticker--item-position newsticker--item-list))
!       (message newsticker--prev-message))))
  
  (defun newsticker--display-scroll ()
    "Called from the display timer.
--- 3429,3435 ----
          (setq newsticker--item-position 0))
        (setq newsticker--prev-message
              (nth newsticker--item-position newsticker--item-list))
!       (message "%s" newsticker--prev-message))))
  
  (defun newsticker--display-scroll ()
    "Called from the display timer.
***************
*** 3465,3471 ****
              (setq subtext (substring subtext 0 t-width))
              (setq t-width (1- t-width))))
          ;; show the ticker text and save current position
!         (message subtext)
          (setq newsticker--prev-message subtext)
          (setq newsticker--item-position (1+ i))
          (when (>= newsticker--item-position l)
--- 3465,3471 ----
              (setq subtext (substring subtext 0 t-width))
              (setq t-width (1- t-width))))
          ;; show the ticker text and save current position
!         (message "%s" subtext)
          (setq newsticker--prev-message subtext)
          (setq newsticker--item-position (1+ i))
          (when (>= newsticker--item-position l)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]