diff --git a/Lisp/OmniModulInsert.lsp b/Lisp/OmniModulInsert.lsp
index 8378d99..f4d09f8 100644
--- a/Lisp/OmniModulInsert.lsp
+++ b/Lisp/OmniModulInsert.lsp
@@ -77,12 +77,14 @@
   (if (and (> (strlen zeile) 0) (= (substr zeile 1 1) "\""))
     (progn
       ;; Key extrahieren: zweites Anfuehrungszeichen finden
+      ;; vl-string-search ist 0-basiert, substr ist 1-basiert
       (setq pos (vl-string-search "\"" zeile 1))
       (if pos
         (progn
-          (setq key (substr zeile 2 pos))
-          ;; Nach dem ":" den Wert extrahieren
-          (setq rest (substr zeile (+ pos 3)))
+          (setq key (substr zeile 2 (1- pos)))
+          ;; Rest nach dem schliessenden " extrahieren
+          (setq rest (substr zeile (+ pos 2)))
+          ;; ":" im Rest finden
           (setq pos (vl-string-search ":" rest))
           (if pos
             (progn