From: Alfons Hoogervorst <alfons@proteus.demon.nl>
Date: Tue, 2 Oct 2001 18:45:45 +0000 (+0000)
Subject: add block cursor
X-Git-Tag: Release_0_6_4claws12~90
X-Git-Url: http://git.claws-mail.org/?p=claws.git;a=commitdiff_plain;h=fa4375d60c51921f8c4f3f8b89d4a78b440820e9

add block cursor
---

diff --git a/ChangeLog.claws b/ChangeLog.claws
index 8d07b48ee..4e255aa9c 100644
--- a/ChangeLog.claws
+++ b/ChangeLog.claws
@@ -1,3 +1,8 @@
+2001-09-02 [alfons]	0.6.2claws14
+
+	* compose.c, prefs_common.[ch]
+		add block cursor option
+
 2001-10-02 [paul]	0.6.2claws13
 
 	* sync with sylpheed 0.6.2cvs9
diff --git a/src/compose.c b/src/compose.c
index 26ae9ed3f..10f2b2168 100644
--- a/src/compose.c
+++ b/src/compose.c
@@ -3549,6 +3549,11 @@ static Compose *compose_create(PrefsAccount *account, ComposeMode mode)
 			    (GTK_SCROLLED_WINDOW(scrolledwin)));
 	GTK_STEXT(text)->default_tab_width = 8;
 	gtk_stext_set_editable(GTK_STEXT(text), TRUE);
+
+	if (prefs_common.block_cursor) {
+		GTK_STEXT(text)->cursor_type = STEXT_CURSOR_BLOCK;
+	}
+	
 	if (prefs_common.smart_wrapping) {	
 		gtk_stext_set_word_wrap(GTK_STEXT(text), TRUE);
 		gtk_stext_set_wrap_rmargin(GTK_STEXT(text), prefs_common.linewrap_len);
diff --git a/src/prefs_common.c b/src/prefs_common.c
index 394cf1dc0..73f07bdd0 100644
--- a/src/prefs_common.c
+++ b/src/prefs_common.c
@@ -117,6 +117,7 @@ static struct Compose {
 
 	GtkWidget * checkbtn_forward_as_attachment;
 	GtkWidget * checkbtn_smart_wrapping;
+	GtkWidget * checkbtn_block_cursor;
 
 	/* spelling */
 #if USE_PSPELL
@@ -349,6 +350,9 @@ static PrefParam param[] = {
         {"smart_wrapping", "TRUE", &prefs_common.smart_wrapping,
 	 P_BOOL, &compose.checkbtn_smart_wrapping,
 	 prefs_set_data_from_toggle, prefs_set_toggle},
+	{"block_cursor", "FALSE", &prefs_common.block_cursor,
+	 P_BOOL, &compose.checkbtn_block_cursor,
+	 prefs_set_data_from_toggle, prefs_set_toggle},
 #if USE_PSPELL
 	{"enable_pspell", "TRUE", &prefs_common.enable_pspell,
 	 P_BOOL, &compose.checkbtn_enable_pspell,
@@ -1276,6 +1280,7 @@ static void prefs_compose_create(void)
 
 	GtkWidget *checkbtn_forward_as_attachment;
 	GtkWidget *checkbtn_smart_wrapping;
+	GtkWidget *checkbtn_block_cursor;
 
 #if USE_PSPELL
 	GtkWidget *frame_spell;
@@ -1452,6 +1457,9 @@ static void prefs_compose_create(void)
 
 	PACK_CHECK_BUTTON (vbox1, checkbtn_smart_wrapping,
 			   _("Smart wrapping (EXPERIMENTAL)"));
+	
+	PACK_CHECK_BUTTON (vbox1, checkbtn_block_cursor,
+			  _("Block cursor"));
 
 #if USE_PSPELL
 	/* spell checker defaults */			   
@@ -1529,6 +1537,8 @@ static void prefs_compose_create(void)
 		checkbtn_forward_as_attachment;
 	compose.checkbtn_smart_wrapping = 
 		checkbtn_smart_wrapping;
+	compose.checkbtn_block_cursor   =
+		checkbtn_block_cursor;
 
 #if USE_PSPELL
 	compose.checkbtn_enable_pspell = checkbtn_enable_pspell;
diff --git a/src/prefs_common.h b/src/prefs_common.h
index 03ab4ed8e..d585c9833 100644
--- a/src/prefs_common.h
+++ b/src/prefs_common.h
@@ -85,6 +85,7 @@ struct _PrefsCommon
 	gchar *fw_quotefmt;
 	gboolean forward_as_attachment;
 	gboolean smart_wrapping;
+	gboolean block_cursor;
 #if USE_PSPELL
 	gboolean enable_pspell;
 	gchar *pspell_path;