/*****************************************************************************
Create a lua console.
*****************************************************************************/
void luaconsole_dialog_init(void)
{
fc_assert_ret(luaconsole == NULL);
/* Create a container for the dialog. */
luaconsole = fc_calloc(1, sizeof(*luaconsole));
luaconsole->message_buffer = gtk_text_buffer_new(NULL);
luaconsole->shell = NULL;
luaconsole->history_list = genlist_new();
luaconsole->history_pos = -1;
luaconsole_welcome_message();
}
/************************************************************************
Returns a new genlist that's a copy of the existing one.
************************************************************************/
struct genlist *genlist_copy(const struct genlist *pgenlist)
{
struct genlist *pcopy = genlist_new();
if (pgenlist) {
struct genlist_link *plink;
for (plink = pgenlist->head_link; plink; plink = plink->next) {
genlist_append(pcopy, plink->dataptr);
}
}
return pcopy;
}
