[FIX] ssg_ks_insert: itoa auf Float-Winkel in Statusmeldung crasht

insert-inclined-scaled-block/insert-rotated-block-with-ks riefen (itoa
winkel) fuer die Statusmeldung auf. Seit *vfk-gefaelle-winkel* (3.0,
Float) statt rohem Integer-Literal 3 verwendet wird, brach das mit
"bad argument type <3.0>; expected <INTEGER>" ab - sichtbar beim
Etage-VF-Bau (Mubea-Testfall), der danach folgende Elemente (u.a.
Gefaellestrecken) nicht mehr baute. Fix: (itoa (fix winkel)).

Lisp/ssg_ks_insert.lsp

@@ -248,7 +248,7 @@
         )
       )
       (princ (ssg-textf "vfc-fuege-ein-lwhz"
-        (list blockname (rtos laenge 2 2) (itoa winkel) (chr 176) (rtos (float hz) 2 1) (chr 176))))
+        (list blockname (rtos laenge 2 2) (itoa (fix winkel)) (chr 176) (rtos (float hz) 2 1) (chr 176))))
       (setq scale (/ laenge (ssg-cfg-or "vario" "skalierung_basis" 1000.0)))
       (setq rad-v (* (float winkel) (/ pi 180.0)))
       (setq rad-h (* (float hz)     (/ pi 180.0)))
@@ -298,7 +298,7 @@
         )
       )
       (princ (ssg-textf "vfc-fuege-block-ein-rotation-hz"
-        (list blockname (itoa winkel) (chr 176) (rtos (float hz) 2 1) (chr 176))))
+        (list blockname (itoa (fix winkel)) (chr 176) (rtos (float hz) 2 1) (chr 176))))
       (setq rad-v (* winkel (/ pi 180.0)))
       (setq rad-h (* (float hz) (/ pi 180.0)))
       (setq chv (cos rad-h) shv (sin rad-h) cvv (cos rad-v) svv (sin rad-v))