zle_refrech bug

zle_refrech bug

[Zoltan Hidvegi]

After applying patches 2336, 2351, 2359, 2386 and 2387 from Geoff
and doing:

% zsh -f
bolyai% echo built<TAB>
bolyai% echo builtin.<CTRL-A>

the cursor goes to the first colunm.

This happend in a Linux XFree86-3.1.2 xterm with this termcap:

xterm|vs100|xterm terminal emulator (X11R6 Window System):\
        :am:bs:km:mi:ms:pt:xn:xo:\
        :co#80:it#8:li#65:\
        :@7=\E[[:AL=\E[%dL:DC=\E[%dP:DL=\E[%dM:F1=\E[23~:\
        :F2=\E[24~:IC=\E[%d@:LE=\E[%dD:UP=\E[%dA:\
        :ac=++\054\054..00II--``aaffgghhjjkkllmmnnooqqssttuuvvwwxx~~:\
        :ae=\E(B:al=\E[L:as=\E(0:bl=^G:cd=\E[J:ce=\E[K:\
        :cl=\E[H\E[2J:cm=\E[%i%d;%dH:cr=^M:cs=\E[%i%d;%dr:\
        :ct=\E[3k:dc=\E[P:dl=\E[M:do=^J:ei=\E[4l:ho=\E[H:\
        :ic=\E[@:im=\E[4h:\
        :is=\E[r\E[m\E[2J\E[H\E[?7h\E[?1;3;4;6l\E[4l:\
        :k1=\E[11~:k2=\E[12~:k3=\E[13~:k4=\E[14~:k5=\E[15~:\
        :k6=\E[17~:k7=\E[18~:k8=\E[19~:k9=\E[20~:k;=\E[21~:\
        :kI=\E[2~:kN=\E[6~:kP=\E[5~:kb=^H:kd=\E[B:kh=\E[@:\
        :kl=\E[D:kr=\E[C:ku=\E[A:le=^H:md=\E[1m:me=\E[m:\
        :mr=\E[7m:nd=\E[C:\
        :r2=\E[r\E[m\E[2J\E[H\E[?7h\E[?1;3;4;6l\E[4l\E<:\
        :rc=\E8:sc=\E7:se=\E[m:sf=^J:so=\E[7m:sr=\EM:ta=^I:\
        :u7=\E[6n:u8=\E[?1;2c:u9=\E[c:ue=\E[m:up=\E[A:\
        :us=\E[4m:

Zoltan

Re: zle_refrech bug

[Geoff Wing]

Zoltan Hidvegi wrote:
:After applying patches 2336, 2351, 2359, 2386 and 2387 from Geoff
:and doing:

You're still expecting me to be able to count.  I didn't get a degree with a
major in Maths for nothing, you know.


*** zle_refresh.c.~5~	Thu Nov 14 14:29:16 1996
--- zle_refresh.c	Thu Nov 14 14:31:53 1996
***************
*** 805,811 ****
  tc_rightcurs(int cl)
  {
      int ct,			/* number of characters to move across	    */
- 	horz_tabs,		/* number of horizontal tabs if we do them  */
  	i = vcs,		/* cursor position after initial movements  */
  	j;
      char *t;
--- 805,810 ----
***************
*** 820,827 ****
  
  /* try tabs if tabs are non destructive and multright is not possible */
      if (!oxtabs && tccan(TCNEXTTAB) && ((vcs | 7) < cl)) {
- 	horz_tabs = 1;
  	i = (vcs | 7) + 1;
  	for ( ; i + 8 <= cl; i += 8)
  	    tcout(TCNEXTTAB);
  	if ((ct = cl - i) == 0) /* number of chars still to move across */
--- 819,826 ----
  
  /* try tabs if tabs are non destructive and multright is not possible */
      if (!oxtabs && tccan(TCNEXTTAB) && ((vcs | 7) < cl)) {
  	i = (vcs | 7) + 1;
+ 	tcout(TCNEXTTAB);
  	for ( ; i + 8 <= cl; i += 8)
  	    tcout(TCNEXTTAB);
  	if ((ct = cl - i) == 0) /* number of chars still to move across */

-- 
Geoff Wing [gwing@primenet.com.au]   Technical Manager
  Phone    : +61-3-9818 2977	     PrimeNet - Internet Consultancy
  Facsimile: +61-3-9819 3788	     Web : <URL:http://www.primenet.com.au/>
  Mobile   : 0412 162 441