version 1.18, 2006/06/01 04:17:34 |
version 1.19, 2006/06/01 09:54:08 |
|
|
if (doto == llength(dotp)) { |
if (doto == llength(dotp)) { |
if (--doto <= 0) |
if (--doto <= 0) |
return (FALSE); |
return (FALSE); |
backchar(f, 1); |
(void)backchar(FFRAND, 1); |
fudge = TRUE; |
fudge = TRUE; |
} else { |
} else { |
if (doto == 0) |
if (doto == 0) |
return (FALSE); |
return (FALSE); |
} |
} |
cr = lgetc(dotp, doto - 1); |
cr = lgetc(dotp, doto - 1); |
backdel(f, 1); |
(void)backdel(FFRAND, 1); |
forwchar(f, 1); |
(void)forwchar(FFRAND, 1); |
linsert(1, cr); |
linsert(1, cr); |
if (fudge != TRUE) |
if (fudge != TRUE) |
backchar(f, 1); |
(void)backchar(FFRAND, 1); |
undo_no_boundary(FALSE); |
undo_no_boundary(FALSE); |
undo_add_boundary(); |
undo_add_boundary(); |
lchange(WFEDIT); |
lchange(WFEDIT); |