* option-edit.el (lyskom-widget-command-action): Gör inte car-safe

på svaret från lyskom-read-extended-command.
(lyskom-widget-command-value-create): Använd lyskom-get-string för
att hitta namn på kommandon.

src/option-edit.el

@@ -747,10 +747,9 @@ customize buffer but do not save them to the server."
 
 (defun lyskom-widget-command-action (widget &optional event)
   (widget-value-set widget
-                    (car-safe
-                     (save-excursion
-                       (set-buffer lyskom-buffer)
-                       (lyskom-read-extended-command))))
+		    (save-excursion
+		      (set-buffer lyskom-buffer)
+		      (lyskom-read-extended-command)))
   (widget-setup))
                
 (defun lyskom-widget-command-value-create (widget)
@@ -760,8 +759,7 @@ customize buffer but do not save them to the server."
          (string (save-excursion
                    (set-buffer lyskom-buffer)
                    (cond ((null value) "")
-                         (t (or (cdr-safe
-				 (assq value lyskom-commands))
+                         (t (or (lyskom-get-string value 'lyskom-command)
                                 (lyskom-format
                                  (lyskom-custom-string 'unknown-command)
                                  (symbol-name value))))))))