| 597 |
gtk_widget_destroy(GTK_WIDGET(about)); |
gtk_widget_destroy(GTK_WIDGET(about)); |
| 598 |
} |
} |
| 599 |
|
|
| 600 |
|
/* ダミー */ |
| 601 |
|
static void dummy_handler() { |
| 602 |
|
GtkAboutDialog *about = GTK_ABOUT_DIALOG(gtk_about_dialog_new()); |
| 603 |
|
gtk_about_dialog_set_name(about, "Sorry... This Button is Dummy."); |
| 604 |
|
gtk_dialog_run(GTK_DIALOG(about)); |
| 605 |
|
gtk_widget_destroy(GTK_WIDGET(about)); |
| 606 |
|
} |
| 607 |
|
|
| 608 |
/* 現在のバッファのカーソル位置の行番号を取得 */ |
/* 現在のバッファのカーソル位置の行番号を取得 */ |
| 609 |
static gint get_current_line_number(GtkTextBuffer *b) { |
static gint get_current_line_number(GtkTextBuffer *b) { |
| 610 |
GtkTextIter p; |
GtkTextIter p; |
| 1074 |
GtkTextIter p; |
GtkTextIter p; |
| 1075 |
append_tabpage(g_strdup("*help*")); |
append_tabpage(g_strdup("*help*")); |
| 1076 |
gtk_text_buffer_set_text(Shiki_CURRENT_TEXT_BUFFER, |
gtk_text_buffer_set_text(Shiki_CURRENT_TEXT_BUFFER, |
| 1077 |
"起動\n" |
"コマンドラインからの起動方法\n" |
| 1078 |
"$ ./shiki [file1 file2 ....]\n\n" |
"$ ./shiki [file1 file2 ....]\n\n" |
| 1079 |
"[フォルダのアイコン] ファイルを開く (C-x C-f)\n" |
"[フォルダのアイコン] ファイルを開く (C-x C-f)\n" |
| 1080 |
"[フロッピーディスクのアイコン] バッファを保存 (C-x C-s)\n" |
"[フロッピーディスクのアイコン] バッファを保存 (C-x C-s)\n" |
| 1081 |
"[フロッピーとえんぴつのアイコン] バッファを別名保存 (C-x C-w)\n" |
"[フロッピーとえんぴつのアイコン] バッファを別名保存 (C-x C-w)\n" |
| 1082 |
"[ギアのアイコン] 選択領域を gauche にロード (region-compile)\n" |
"[ギアのアイコン] 選択領域を gauche にロード\n" |
| 1083 |
"[マーキング (ちょん) のアイコン] タブの on/off\n" |
"[マーキング (ちょん) のアイコン] タブの on/off\n" |
| 1084 |
"[工具 (スパナ) のアイコン] タブの位置の調整\n" |
"[工具 (スパナ) のアイコン] タブの位置の調整\n" |
| 1085 |
"[まる + アイコン] 新規バッファを開く (C-t) (tab)\n" |
"[新規アイコン] 新規バッファを開く (C-t)\n" |
| 1086 |
"[左向き矢印アイコン] やり直し (C-_)\n" |
"[左向き矢印アイコン] やり直し (C-_)\n" |
| 1087 |
"[ゴミ箱アイコン] バッファをクリア\n" |
"[ゴミ箱アイコン] バッファをクリア\n" |
| 1088 |
"[× アイコン] バッファを閉じる (C-k) (kill buffer)\n" |
"[× アイコン] バッファを閉じる (C-k)\n" |
| 1089 |
"[A アイコン] フォントの選択\n" |
"[A アイコン] フォントの選択\n" |
| 1090 |
"[顔みたいなアイコン] Scheme ファイルのロード\n" |
"[顔みたいなアイコン] Scheme ファイルのロード\n" |
| 1091 |
"[緑っぽい,変換アイコン] バッファの内容を全てロード\n" |
"[緑っぽい,変換アイコン] バッファの内容を全てロード\n" |
| 1109 |
"C-M-SPC : カーソル手前の S 式を選択 (mark-last-sexp)\n" |
"C-M-SPC : カーソル手前の S 式を選択 (mark-last-sexp)\n" |
| 1110 |
"C-x C-c : 終了.ウィンドウの × ボタンを押したのと同じ\n" |
"C-x C-c : 終了.ウィンドウの × ボタンを押したのと同じ\n" |
| 1111 |
"\n" |
"\n" |
| 1112 |
"また,内容が失われる恐れがあるときには全て「Really Quit ?」のように警告します.\n", -1); |
"内容が失われる恐れがあるときには全て「Really Quit ?」のように警告します.\n", -1); |
| 1113 |
gtk_text_buffer_set_modified(Shiki_CURRENT_TEXT_BUFFER, FALSE); |
gtk_text_buffer_set_modified(Shiki_CURRENT_TEXT_BUFFER, FALSE); |
| 1114 |
/* カーソル位置を先頭に */ |
/* カーソル位置を先頭に */ |
| 1115 |
gtk_text_buffer_get_start_iter(Shiki_CURRENT_TEXT_BUFFER, &p); |
gtk_text_buffer_get_start_iter(Shiki_CURRENT_TEXT_BUFFER, &p); |
| 1203 |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
| 1204 |
gtk_tool_item_set_tooltip(icon, toolbar_tips, "タブ位置の設定", ""); |
gtk_tool_item_set_tooltip(icon, toolbar_tips, "タブ位置の設定", ""); |
| 1205 |
|
|
| 1206 |
icon = gtk_tool_button_new(gtk_image_new_from_stock ("gtk-add", iconsize), ""); |
icon = gtk_tool_button_new(gtk_image_new_from_stock ("gtk-new", iconsize), ""); |
| 1207 |
g_signal_connect(G_OBJECT(icon), "clicked", G_CALLBACK(append_default_tabpage_handler), NULL); |
g_signal_connect(G_OBJECT(icon), "clicked", G_CALLBACK(append_default_tabpage_handler), NULL); |
| 1208 |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
| 1209 |
gtk_tool_item_set_tooltip(icon, toolbar_tips, "新規バッファを開きます", ""); |
gtk_tool_item_set_tooltip(icon, toolbar_tips, "新規バッファを開きます", ""); |
| 1213 |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
| 1214 |
gtk_tool_item_set_tooltip(icon, toolbar_tips, "Undo",""); |
gtk_tool_item_set_tooltip(icon, toolbar_tips, "Undo",""); |
| 1215 |
|
|
| 1216 |
|
/* XXX : TODO */ |
| 1217 |
|
|
| 1218 |
|
icon = gtk_tool_button_new(gtk_image_new_from_stock ("gtk-find", iconsize), ""); |
| 1219 |
|
g_signal_connect(G_OBJECT(icon), "clicked", G_CALLBACK(dummy_handler), NULL); |
| 1220 |
|
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
| 1221 |
|
gtk_tool_item_set_tooltip(icon, toolbar_tips, "検索", ""); |
| 1222 |
|
|
| 1223 |
|
|
| 1224 |
|
icon = gtk_tool_button_new(gtk_image_new_from_stock ("gtk-find-and-replace", iconsize), ""); |
| 1225 |
|
g_signal_connect(G_OBJECT(icon), "clicked", G_CALLBACK(dummy_handler), NULL); |
| 1226 |
|
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
| 1227 |
|
gtk_tool_item_set_tooltip(icon, toolbar_tips, "置換", ""); |
| 1228 |
|
|
| 1229 |
|
icon = gtk_tool_button_new(gtk_image_new_from_stock ("gtk-refresh", iconsize), ""); |
| 1230 |
|
g_signal_connect(G_OBJECT(icon), "clicked", G_CALLBACK(dummy_handler), NULL); |
| 1231 |
|
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
| 1232 |
|
gtk_tool_item_set_tooltip(icon, toolbar_tips, "リロード", ""); |
| 1233 |
|
|
| 1234 |
|
/* TODO ここまで */ |
| 1235 |
|
|
| 1236 |
icon = gtk_tool_button_new(gtk_image_new_from_stock ("gtk-delete", iconsize), ""); |
icon = gtk_tool_button_new(gtk_image_new_from_stock ("gtk-delete", iconsize), ""); |
| 1237 |
g_signal_connect(G_OBJECT(icon), "clicked", G_CALLBACK(clear_current_buffer), G_OBJECT(Shiki_EDITOR_NOTEBOOK)); |
g_signal_connect(G_OBJECT(icon), "clicked", G_CALLBACK(clear_current_buffer), G_OBJECT(Shiki_EDITOR_NOTEBOOK)); |
| 1238 |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
| 1260 |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
| 1261 |
gtk_tool_item_set_tooltip(icon, toolbar_tips, "バッファをロード", ""); |
gtk_tool_item_set_tooltip(icon, toolbar_tips, "バッファをロード", ""); |
| 1262 |
|
|
| 1263 |
|
icon = gtk_tool_button_new(gtk_image_new_from_stock ("gtk-spell-check", iconsize), ""); |
| 1264 |
|
g_signal_connect(G_OBJECT(icon), "clicked", G_CALLBACK(scheme_keyword_highlighting_current_buffer), NULL); |
| 1265 |
|
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
| 1266 |
|
gtk_tool_item_set_tooltip(icon, toolbar_tips, "シンタックスハイライティング", ""); |
| 1267 |
|
|
| 1268 |
|
|
| 1269 |
icon = gtk_tool_button_new(gtk_image_new_from_stock ("gtk-dialog-question", iconsize), ""); |
icon = gtk_tool_button_new(gtk_image_new_from_stock ("gtk-dialog-question", iconsize), ""); |
| 1270 |
g_signal_connect(G_OBJECT(icon), "clicked", G_CALLBACK(open_online_help), NULL); |
g_signal_connect(G_OBJECT(icon), "clicked", G_CALLBACK(open_online_help), NULL); |
| 1271 |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |
gtk_container_add(GTK_CONTAINER (toolbar), GTK_WIDGET(icon)); |