Commit db78a345 authored by Linus Tolke's avatar Linus Tolke
Browse files

kom-save-text har default-filnamn.

parent f78cd912
No preview for this file type
No preview for this file type
...@@ -484,7 +484,7 @@ upptagna. Logga ut och kom tillbaks senare om du v ...@@ -484,7 +484,7 @@ upptagna. Logga ut och kom tillbaks senare om du v
(one-unread . " - 1 olst\n") (one-unread . " - 1 olst\n")
(several-unread . " - %#1d olsta\n") (several-unread . " - %#1d olsta\n")
(save-on-file-q . "Spara inlgg p fil: ") (save-on-file-q . "Spara inlgg p fil: (%#1s) ")
(wait-for-prompt . "Vnta p prompten!") (wait-for-prompt . "Vnta p prompten!")
(go-to-pri-conf-prompt . "G till nsta prioriterade mte") (go-to-pri-conf-prompt . "G till nsta prioriterade mte")
(read-pri-text-conf . "Lsa nsta prioriterade text") (read-pri-text-conf . "Lsa nsta prioriterade text")
......
...@@ -372,6 +372,8 @@ message \"new text\" is received.") ...@@ -372,6 +372,8 @@ message \"new text\" is received.")
(defvar lyskom-current-subject "" (defvar lyskom-current-subject ""
"Current subject.") "Current subject.")
(defvar lyskom-saved-file-name (concat default-directory "kom-text")
"The default file name when saving a lyskom-text.")
(defvar lyskom-mode-hook nil (defvar lyskom-mode-hook nil
"Hook to run when lyskom-mode is entered.") "Hook to run when lyskom-mode is entered.")
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment