2005-01-27 [colin] 1.0.0cvs16

[claws.git] / src / compose.c

diff --git a/src/compose.c b/src/compose.c
index 82d7791ed82bf34499ca7ee864b0820ca6575ac5..78c747894efe8ed61b6ff8dc5846f36f86078164 100644 (file)
--- a/src/compose.c
+++ b/src/compose.c
@@ -6923,3 +6923,16 @@ static void compose_add_field_list( Compose *compose, GList *listAddress ) {
  * End of Source.
  */
 
  * End of Source.
  */
 

+void compose_reply_from_messageview(MessageView *msgview, GSList *msginfo_list, 
+                                   guint action)
+{
+       gchar *body;
+
+       g_return_if_fail(msgview != NULL);
+
+       g_return_if_fail(msginfo_list != NULL);
+
+       body = messageview_get_selection(msgview);
+       compose_reply_mode((ComposeMode)action, msginfo_list, body);
+       g_free(body);
+}