bug#6349: 24.0.50; C-a doesn't work in tty

bug#6349: 24.0.50; C-a doesn't work in tty

[Katsumi Yamaoka]

Hi,

If a long line, of which the left side is truncated, begins with
a wide character in the window, the `C-a' command doesn't move
the cursor.  It happens in Emacs launched as `emacs -nw -Q'.
Please try this form:

(let ((buffer (get-buffer-create "*testing*")))
  (pop-to-buffer buffer)
  (erase-buffer)
  (insert-char (make-char 'japanese-jisx0208 36 34) 256)
  (setq truncate-lines t)
  (end-of-line))

In GNU Emacs 24.0.50.1 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2010-06-04 on ******
Windowing system distributor `Fedora Project', version 11.0.10800000
configured using `configure  '--with-x-toolkit=lucid' '--without-xim'

bug#6349: 24.0.50; C-a doesn't work in tty

[Katsumi Yamaoka]

>>>>> Katsumi Yamaoka wrote:
> If a long line, of which the left side is truncated, begins with
> a wide character in the window, the `C-a' command doesn't move
> the cursor.  It happens in Emacs launched as `emacs -nw -Q'.
> Please try this form:

> (let ((buffer (get-buffer-create "*testing*")))
>   (pop-to-buffer buffer)
>   (erase-buffer)
>   (insert-char (make-char 'japanese-jisx0208 36 34) 256)
>   (setq truncate-lines t)
>   (end-of-line))

Not only the C-a command but also any kind of operation that should
set the window-hscroll to zero doesn't seem to work in tty.  The
following forms are expected to show the line from the beginning.

(let ((buffer (get-buffer-create "*testing*")))
  (pop-to-buffer buffer)
  (erase-buffer)
  (insert-char (make-char 'japanese-jisx0208 36 34) 256)
  (setq truncate-lines t)
  (end-of-line)
  (sit-for 0)
  (skip-chars-backward "^\n"))

(let ((buffer (get-buffer-create "*testing*")))
  (pop-to-buffer buffer)
  (erase-buffer)
  (insert-char (make-char 'japanese-jisx0208 36 34) 256)
  (setq truncate-lines t)
  (end-of-line)
  (sit-for 0)
  (if (search-backward "\n" nil 'move) (forward-char 1)))

(let ((buffer (get-buffer-create "*testing*")))
  (pop-to-buffer buffer)
  (erase-buffer)
  (insert-char (make-char 'japanese-jisx0208 36 34) 256)
  (setq truncate-lines t)
  (end-of-line)
  (sit-for 0)
  (beginning-of-line))

(let ((buffer (get-buffer-create "*testing*")))
  (pop-to-buffer buffer)
  (erase-buffer)
  (insert-char (make-char 'japanese-jisx0208 36 34) 256)
  (setq truncate-lines t)
  (end-of-line)
  (sit-for 0)
  (goto-char (line-beginning-position)))

> In GNU Emacs 24.0.50.1 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
>  of 2010-06-04 on ******
> Windowing system distributor `Fedora Project', version 11.0.10800000
> configured using `configure  '--with-x-toolkit=lucid' '--without-xim'

Thanks Fujiwara-san who also confirmed the same behavior on
NetBSD/amd64 5.0_STABLE.

bug#6349: 24.0.50; C-a doesn't work in tty

[Katsumi Yamaoka]

Katsumi Yamaoka wrote:
>>>>>> Katsumi Yamaoka wrote:
>> If a long line, of which the left side is truncated, begins with
>> a wide character in the window, the `C-a' command doesn't move
>> the cursor.  It happens in Emacs launched as `emacs -nw -Q'.
>> Please try this form:

>> (let ((buffer (get-buffer-create "*testing*")))
>>   (pop-to-buffer buffer)
>>   (erase-buffer)
>>   (insert-char (make-char 'japanese-jisx0208 36 34) 256)
>>   (setq truncate-lines t)
>>   (end-of-line))

> Not only the C-a command but also any kind of operation that should
> set the window-hscroll to zero doesn't seem to work in tty.

[...]

Here's a workaround:

(defadvice move-beginning-of-line (after set-window-hscroll-to-zero-in-tty
					 activate)
  "Set window-hscroll to zero in tty if point moves to bol."
  (if (and (not window-system) (bolp))
      (set-window-hscroll (selected-window) 0)))

bug#6349: 24.0.50; C-a doesn't work in tty

[Kenichi Handa]

I found that this bug was introduced to the trunk by this
change:

------------------------------------------------------------
revno: 99771 [merge]
committer: Eli Zaretskii <eliz@gnu.org>
branch nick: trunk
timestamp: Tue 2010-03-30 05:13:07 -0400
message:
  Initial support for bidirectional editing.
  
   Makefile.in (obj): Include bidi.o.
   (bidi.o): New target.
   makefile.w32-in (OBJ1): Add $(BLD)/bidi.$(O).
[...]
------------------------------------------------------------

So, Eli, could you please take a look at it?

---
Kenichi Handa
handa@m17n.org

bug#6349: 24.0.50; C-a doesn't work in tty

[Eli Zaretskii]

> Resent-Sender: help-debbugs@gnu.org
> From: Kenichi Handa <handa@m17n.org>
> Date: Fri, 01 Oct 2010 21:53:13 +0900
> Cc: 
> 
> I found that this bug was introduced to the trunk by this
> change:
> 
> ------------------------------------------------------------
> revno: 99771 [merge]
> committer: Eli Zaretskii <eliz@gnu.org>
> branch nick: trunk
> timestamp: Tue 2010-03-30 05:13:07 -0400
> message:
>   Initial support for bidirectional editing.
>   
>    Makefile.in (obj): Include bidi.o.
>    (bidi.o): New target.
>    makefile.w32-in (OBJ1): Add $(BLD)/bidi.$(O).
> [...]
> ------------------------------------------------------------
> 
> So, Eli, could you please take a look at it?

Should be fixed now (revno 101714).