Set default values for mark association widget.

src/ChangeLog

 2001-04-21  Joel Rosdahl  <joel@rosdahl.net>
 
+	* option-edit.el (lyskom-widget-mark-association-action): Set
+	default values.
+
 	* vars.el.in (kom-default-mark): New default value: ask for mark
 	type.
 

src/option-edit.el

@@ -1516,11 +1516,13 @@ customize buffer but do not save them to the server."
   (widget-value-set
    widget
    (cons
-    (lyskom-read-string (widget-get widget ':mark-key-prompt))
+    (lyskom-read-string (widget-get widget ':mark-key-prompt)
+                        (car (widget-value widget)))
     (lyskom-read-num-range 0
                            255
                            (widget-get widget ':mark-value-prompt)
-                           t)))
+                           t
+                           (cdr (widget-value widget)))))
   (widget-setup))
 
 (defun lyskom-widget-mark-association-match (widget value)