Variable that selects behaviour after that a text is sent.

src/edit-text.el

@@ -302,8 +302,10 @@ Entry to this mode runs lyskom-edit-mode-hook."
 	    (initiate-create-text 'sending 'lyskom-create-text-handler
 				  (concat subject "\n" message) misc-list
 				  buffer)))
-	(set-window-configuration lyskom-edit-return-to-configuration)
-	(set-buffer (window-buffer (selected-window)))
+	(if kom-dont-restore-window-after-editing
+	    (bury-buffer)
+	  (set-window-configuration lyskom-edit-return-to-configuration)
+	  (set-buffer (window-buffer (selected-window))))
 	(goto-char (point-max)))))
 
 

src/vars.el

@@ -64,6 +64,9 @@ uses the same window.")
 (defvar kom-created-texts-are-read t
   "*Non-nil means automatically mark texts that you create as read.")
 
+(defvar kom-dont-restore-window-after-editing nil
+  "*If non-nil then don't restore the window configuration after sending a text.")
+
 (defvar kom-default-mark 100
   "*If non-nil (must be an integer) then the user is not asked for type of mark.")