Some prompt fiddling.

src/ChangeLog

 2001-04-21  Joel Rosdahl  <joel@rosdahl.net>
 
+	* option-edit.el (lyskom-widget-string-action): Nicer prompt
+	strings.
+	(lyskom-widget-number-action): Ditto.
+
+	* swedish-strings.el (lyskom-custom-strings): Nicer prompt
+	strings.
+
 	* option-edit.el (lyskom-widget-mark-association-action): Set
 	default values.
 

src/english-strings.el

@@ -2313,9 +2313,9 @@ Select whether to execute command or keyboard macro.")
     (ask-every-time . "Ask every time         ")
     (fixed-priority . "Fixed priority")
 
-    (messages-in-lyskom-buffer . "In the LysKOM buffer  ")
+    (messages-in-lyskom-buffer . "In the LysKOM buffer")
     (discard-messages .          "Nowhere - discard them")
-    (in-named-buffer .           "In a named buffer     ")
+    (in-named-buffer .           "In a named buffer:")
 
     (everybody-rcpt . "Everybody                                ")
     (group-rcpt .     "The recipient of the last group message  ")
@@ -2354,9 +2354,9 @@ Select whether to execute command or keyboard macro.")
     (specific-placement . "Specific location")
     (priority . "Priority")
     (same-as-conf . "Same as current conference")
-    (custom-format . "Custom format")
+    (custom-format . "Custom format:")
     (default-format . "Standard format")
-    (a-string . "The string")
+    (a-string . "A string:")
     (some-string . "A random string")
     (unspecified . "Unspecified")
 
@@ -3316,7 +3316,7 @@ be saved in the server. Otherwise it will be saved in your .emacs.")
 
     (kom-symbolic-marks-alist-tag . "Symbolic mark types:")
 
-    (kom-cite-string-tag . "Quotation indicator: ")
+    (kom-cite-string-tag . "Quotation indicator:")
     (kom-confirm-multiple-recipients-tag . 
 "Confirm multiple recipients:         ")
     (kom-check-commented-author-membership-tag . 

src/option-edit.el

@@ -1360,7 +1360,7 @@ customize buffer but do not save them to the server."
 
 (defun lyskom-widget-string-action (widget &optional event)
   (let ((tmp (lyskom-read-from-minibuffer 
-              (format "%s: " (widget-get widget ':tag))
+              (format "%s " (widget-get widget ':tag))
               (widget-value widget))))
     (widget-value-set widget tmp)
     (widget-setup)))
@@ -1382,10 +1382,10 @@ customize buffer but do not save them to the server."
      widget
      (if (and min max)
          (lyskom-read-num-range min max
-                                (concat (widget-get widget ':tag) ": ")
+                                (widget-get widget ':tag)
                                 t
                                 (widget-value widget))
-       (lyskom-read-number (concat (widget-get widget ':tag) ": ")
+       (lyskom-read-number (widget-get widget ':tag)
                            (widget-value widget))))
     (widget-setup)))
 

src/swedish-strings.el

@@ -2350,9 +2350,9 @@ Du m
     (ask-every-time . "Frga varje gng      ")
     (fixed-priority . "Fast prioritet")
 
-    (messages-in-lyskom-buffer . "I LysKOM-bufferten ")
-    (discard-messages .          "Ingenstans         ")
-    (in-named-buffer .           "I namngiven buffert")
+    (messages-in-lyskom-buffer . "I LysKOM-bufferten  ")
+    (discard-messages .          "Ingenstans          ")
+    (in-named-buffer .           "I namngiven buffert:")
 
     (everybody-rcpt .       "Alla                              ")
     (group-rcpt .           "Senaste gruppmeddelandes mottagare")
@@ -2392,9 +2392,9 @@ Du m
     (specific-placement . "Specifik plats")
     (priority . "Prioritet")
     (same-as-conf . "Samma som aktuellt mte")
-    (custom-format . "Eget format")
+    (custom-format . "Eget format:")
     (default-format . "Standardformat")
-    (a-string . "En text")
+    (a-string . "En text:")
     (some-string . "En slumpmssig text")
     (unspecified . "Ospecificerat")
 
@@ -3357,7 +3357,7 @@ i servern. Annars sparas det i din .emacs.")
 
     (kom-symbolic-marks-alist-tag . "Symboliska markeringstyper:")
 
-    (kom-cite-string-tag . "Citatmarkering: ")
+    (kom-cite-string-tag . "Citatmarkering:")
     (kom-confirm-multiple-recipients-tag . 
 "Bekrfta multipla mottagare:                   ")
     (kom-check-commented-author-membership-tag .