/*
* Print the list of completions in a set of columns.
*/
static void
completion_print (gl_list_t l, size_t size)
{
size_t i, j, col, max, numcols;
max = calculate_max_length (l, size) + 5;
numcols = (get_window_ewidth (cur_wp) - 1) / max;
bprintf ("Possible completions are:\n");
for (i = col = 0; i < MIN (size, gl_list_size (l)); i++)
{
char *s = (char *) gl_list_get_at (l, i);
size_t len = strlen (s);
if (col >= numcols)
{
col = 0;
insert_newline ();
}
insert_nstring (s, len);
for (j = max - len; j > 0; --j)
insert_char_in_insert_mode (' ');
++col;
}
}
/*
* Revert an action. Return the next undo entry.
*/
static undop revert_action(undop up)
{
int i;
doing_undo = TRUE;
if (up->type == UNDO_END_SEQUENCE) {
undo_save(UNDO_START_SEQUENCE, up->pointn, up->pointo, 0, 0);
up = up->next;
while (up->type != UNDO_START_SEQUENCE) {
revert_action(up);
up = up->next;
}
undo_save(UNDO_END_SEQUENCE, up->pointn, up->pointo, 0, 0);
goto_point(up->pointn, up->pointo);
return up->next;
}
goto_point(up->pointn, up->pointo);
switch (up->type) {
case UNDO_INSERT_CHAR:
if (up->delta.c == '\n')
insert_newline();
else
insert_char_in_insert_mode(up->delta.c);
break;
case UNDO_INTERCALATE_CHAR:
if (up->delta.c == '\n')
intercalate_newline();
else
intercalate_char(up->delta.c);
break;
case UNDO_INSERT_BLOCK:
undo_save(UNDO_REMOVE_BLOCK, up->pointn, up->pointo, up->delta.block.size, 0);
undo_nosave = TRUE;
for (i = 0; i < up->delta.block.size; i++)
if (up->delta.block.text[i] != '\n')
insert_char(up->delta.block.text[i]);
else
insert_newline();
undo_nosave = FALSE;
break;
case UNDO_REMOVE_CHAR:
FUNCALL(delete_char);
break;
case UNDO_REMOVE_BLOCK:
undo_save(UNDO_INSERT_BLOCK, up->pointn, up->pointo, up->delta.block.size, 0);
undo_nosave = TRUE;
for (i = 0; i < up->delta.block.size; i++)
FUNCALL(delete_char);
undo_nosave = FALSE;
break;
case UNDO_REPLACE_CHAR:
undo_save(UNDO_REPLACE_CHAR, up->pointn, up->pointo,
cur_wp->pointp->text[up->pointo], 0);
cur_wp->pointp->text[up->pointo] = up->delta.c;
cur_bp->flags |= BFLAG_MODIFIED;
if (cur_bp->flags & BFLAG_FONTLOCK)
font_lock_reset_anchors(cur_bp, cur_wp->pointp);
break;
case UNDO_REPLACE_BLOCK:
undo_save(UNDO_REPLACE_BLOCK, up->pointn, up->pointo,
up->delta.block.size, up->delta.block.osize);
undo_nosave = TRUE;
for (i = 0; i < up->delta.block.size; i++)
FUNCALL(delete_char);
for (i = 0; i < up->delta.block.osize; i++)
if (up->delta.block.text[i] != '\n')
insert_char(up->delta.block.text[i]);
else
insert_newline();
undo_nosave = FALSE;
break;
}
doing_undo = FALSE;
return up->next;
}
