Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!sgtp.apple.juice!shin
From: shin@sgtp.apple.juice
Newsgroups: gnu.emacs.bug
Subject: Emacs-18.53 bug(?) and mail test
Message-ID: <8904120804.AA14150@sgtp.apple.juice>
Date: 12 Apr 89 08:04:44 GMT
Sender: daemon@tut.cis.ohio-state.edu
Distribution: gnu
Organization: GNUs Not Usenet
Lines: 38

Dear FSF people:

I am trying to establish the oversea mail link so as to report bugs about GNU
products.  As I'm not sure that this mail will reach you successfully, I
report a trivial bug (?) about Emacs-18.53.

If you send me a reply saying "I have gotten your letter successfully", it
helps me very much.

My address is...

    shin%sgtp.apple.juice%lkbreth.foretune.junet%uunet.uu.net

By the way, bug report starts here.

In lisp function 'picture-tab', parentheses around 'point' are missing.

    (defun picture-tab (&optional arg)
      "Tab transparently (move) to next tab stop.
    With ARG overwrite the traversed text with spaces.  The tab stop
    list can be changed by \\[picture-set-tab-stops] and \\[edit-tab-stops].
    See also documentation for variable  picture-tab-chars."
      (interactive "P")
      (let* ((opoint (point))
             (target (prog2 (tab-to-tab-stop)
                            (current-column)
                            (delete-region opoint (point)))))
        (move-to-column-force target)
        (if arg
            (let (indent-tabs-mode)
              (delete-region opoint point) <-- here!!
              (indent-to target)))))


Sincerely yours.

-
Shinichirou Sugou   shin%sgtp.apple.juice%lkbreth.foretune.junet%uunet.uu.net