unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* [kobayays@otsukakj.co.jp: vertical-motion]
@ 2006-08-27  8:39 Richard Stallman
  2006-08-27  8:49 ` David Kastrup
  2006-08-28 22:00 ` Chong Yidong
  0 siblings, 2 replies; 9+ messages in thread
From: Richard Stallman @ 2006-08-27  8:39 UTC (permalink / raw)


Would someone please DTRT and ack?

------- Start of forwarded message -------
From: KOBAYASHI Yasuhiro <kobayays@otsukakj.co.jp>
To: emacs-pretest-bug@gnu.org
Date: Thu, 24 Aug 2006 14:13:30 +0900
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Subject: vertical-motion
X-Spam-Status: No, score=0.0 required=5.0 tests=none autolearn=failed 
	version=3.0.4

It seems that vertical-motion is not right in the case which
some propertized texts are included in the line.


- - Test function:

(defun test-case (n)
  ;; Preparate the test buffer.
  (switch-to-buffer (get-buffer-create "test"))
  (erase-buffer)
  (let ((pos (point-min)))
    (dotimes (i 3) (insert "\t\t\t\t\t\n"))
    (while (< pos (point-max))
      (and (= (char-after pos) ?\t)
	   (put-text-property pos (1+ pos) 'display (propertize "   >")))
      (setq pos (1+ pos))))
  ;; The following is the test case.
  (goto-char (point-min))
  (while (< (point) (point-max))
    (beginning-of-line)
    (forward-char n)
    ;; If POINT is not on the edge of the line,
    ;; POINT move to the beginning of the save line.
    (vertical-motion 1)))


- - Correct actions.
(test-case 0)
(test-case 5)

- - Strange actions.
(test-case 1)
(test-case 2)
(test-case 3)
(test-case 4)

- -- 
KOBAYASHI Yasuhiro <kobayays@otsukakj.co.jp>


_______________________________________________
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug
------- End of forwarded message -------

^ permalink raw reply	[flat|nested] 9+ messages in thread

end of thread, other threads:[~2006-08-29 22:17 UTC | newest]

Thread overview: 9+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2006-08-27  8:39 [kobayays@otsukakj.co.jp: vertical-motion] Richard Stallman
2006-08-27  8:49 ` David Kastrup
2006-08-27 21:51   ` Kim F. Storm
2006-08-27 22:10     ` David Kastrup
2006-08-27 22:41       ` Kim F. Storm
2006-08-28 22:10       ` Richard Stallman
2006-08-28  9:52   ` Richard Stallman
2006-08-28 22:00 ` Chong Yidong
2006-08-29 22:17   ` Chong Yidong

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).