     (,factor--regex-constructor . 'factor-font-lock-constructor)
     (,factor--regex-setter . 'factor-font-lock-setter-word)
     (,factor--regex-symbol-definition 2 'factor-font-lock-symbol-definition)
-    (,factor--regex-using-line 1 'factor-font-lock-vocabulary-name)
+    (,factor--regex-using-lines 1 'factor-font-lock-vocabulary-name)
     (,factor--regex-use-line 1 'factor-font-lock-vocabulary-name))
   "Font lock keywords definition for Factor mode.")
 


(defun factor--current-listener-vocab ()
  (car (factor--listener-send-cmd "USING: parser ; in get .")))


(defun factor--set-current-listener-vocab (&optional vocab)
  (factor--listener-send-cmd

  "Key map used by Factor mode.")

(defsubst factor--beginning-of-defun (times)
  (re-search-backward factor--regex-begin-of-def nil t times))

(defsubst factor--end-of-defun ()
  (re-search-forward factor--regex-end-of-def nil t))

;;;###autoload
(defun factor-mode ()
