| 46 |
typedef struct { |
typedef struct { |
| 47 |
const gchar *locale; /* バッファ内容のロケール */ |
const gchar *locale; /* バッファ内容のロケール */ |
| 48 |
GtkScrolledWindow *tabpage; /* タブ */ |
GtkScrolledWindow *tabpage; /* タブ */ |
| 49 |
gchar *tabpage_label; /* ベース (ファイル名) のみ */ |
gchar *tabpage_label; /* タブのタイトル */ |
| 50 |
|
gchar *basename; /* ベース (ファイル名) のみ */ |
| 51 |
GtkTextView *text_view; /* タブの表示 */ |
GtkTextView *text_view; /* タブの表示 */ |
| 52 |
GtkTextBuffer *text_buffer; /* タブのテキストバッファ */ |
GtkTextBuffer *text_buffer; /* タブのテキストバッファ */ |
| 53 |
gchar *filename; /* ファイル名のフルパス */ |
gchar *filename; /* ファイル名のフルパス */ |
| 87 |
#define Shiki_CURRENT_TAB_TITLE (shiki_editor.current_tabpage_info)->tabpage_label |
#define Shiki_CURRENT_TAB_TITLE (shiki_editor.current_tabpage_info)->tabpage_label |
| 88 |
#define Shiki_CURRENT_TEXT_VIEW (shiki_editor.current_tabpage_info)->text_view |
#define Shiki_CURRENT_TEXT_VIEW (shiki_editor.current_tabpage_info)->text_view |
| 89 |
#define Shiki_CURRENT_TEXT_BUFFER (shiki_editor.current_tabpage_info)->text_buffer |
#define Shiki_CURRENT_TEXT_BUFFER (shiki_editor.current_tabpage_info)->text_buffer |
| 90 |
|
#define Shiki_CURRENT_BASENAME (shiki_editor.current_tabpage_info)->basename |
| 91 |
#define Shiki_CURRENT_FILENAME (shiki_editor.current_tabpage_info)->filename |
#define Shiki_CURRENT_FILENAME (shiki_editor.current_tabpage_info)->filename |
| 92 |
#define Shiki_CURRENT_BUFFER_ENV (shiki_editor.current_tabpage_info)->env |
#define Shiki_CURRENT_BUFFER_ENV (shiki_editor.current_tabpage_info)->env |
| 93 |
|
|
| 428 |
tabinfo->locale = "Gtk Default (utf8)"; |
tabinfo->locale = "Gtk Default (utf8)"; |
| 429 |
tabinfo->undoInfoList = NULL; |
tabinfo->undoInfoList = NULL; |
| 430 |
tabinfo->filename = filename; |
tabinfo->filename = filename; |
| 431 |
tabinfo->tabpage_label = g_path_get_basename(filename); |
tabinfo->basename = g_path_get_basename(filename); |
| 432 |
|
tabinfo->tabpage_label = g_strndup(tabinfo->basename, 7); |
| 433 |
tabinfo->env = Scm_MakeModule(NULL, FALSE); |
tabinfo->env = Scm_MakeModule(NULL, FALSE); |
| 434 |
|
|
| 435 |
g_return_if_fail(tabinfo->env != SCM_FALSE); |
g_return_if_fail(tabinfo->env != SCM_FALSE); |
| 490 |
gtk_widget_destroy(GTK_WIDGET(Shiki_CURRENT_TEXT_VIEW)); |
gtk_widget_destroy(GTK_WIDGET(Shiki_CURRENT_TEXT_VIEW)); |
| 491 |
/* タブに対応するタブ情報を削除 */ |
/* タブに対応するタブ情報を削除 */ |
| 492 |
g_free(Shiki_CURRENT_TAB_TITLE); |
g_free(Shiki_CURRENT_TAB_TITLE); |
| 493 |
|
g_free(Shiki_CURRENT_BASENAME); |
| 494 |
g_free(Shiki_CURRENT_FILENAME); |
g_free(Shiki_CURRENT_FILENAME); |
| 495 |
Shiki_EDITOR_TAB_INFO_LIST = g_list_delete_link(Shiki_EDITOR_TAB_INFO_LIST, g_list_nth(Shiki_EDITOR_TAB_INFO_LIST, Shiki_CURRENT_TAB_NUM)); |
Shiki_EDITOR_TAB_INFO_LIST = g_list_delete_link(Shiki_EDITOR_TAB_INFO_LIST, g_list_nth(Shiki_EDITOR_TAB_INFO_LIST, Shiki_CURRENT_TAB_NUM)); |
| 496 |
g_free(Shiki_CURRENT_TAB_INFO); |
g_free(Shiki_CURRENT_TAB_INFO); |
| 624 |
|
|
| 625 |
g_snprintf(label, 1024, "--%s- %-10s (Gauche Interaction) [%s] L%d:%d ", |
g_snprintf(label, 1024, "--%s- %-10s (Gauche Interaction) [%s] L%d:%d ", |
| 626 |
gtk_text_buffer_get_modified(Shiki_CURRENT_TEXT_BUFFER) ? "**" : "--", |
gtk_text_buffer_get_modified(Shiki_CURRENT_TEXT_BUFFER) ? "**" : "--", |
| 627 |
Shiki_CURRENT_TAB_TITLE, |
Shiki_CURRENT_BASENAME, |
| 628 |
Shiki_CURRENT_LOCALE, |
Shiki_CURRENT_LOCALE, |
| 629 |
gtk_text_iter_get_line(&p) + 1, |
gtk_text_iter_get_line(&p) + 1, |
| 630 |
gtk_text_iter_get_line_offset (&p) + 1); |
gtk_text_iter_get_line_offset (&p) + 1); |