          (list "\\<[A-Za-z0-9_]+@[[:alpha:]]+\\_>"
                '(0 font-lock-constant-face))
          ;; single quote strings
-         (list "'.*?'" '(0 font-lock-string-face))
+         (list "'.+?'" '(0 font-lock-string-face))
         ))
   (setq font-lock-defaults '(mock-mode-font-lock-keywords))
   (set (make-local-variable 'syntax-propertize-function)


(defun mock-goto-line (n)
  "Go to a line in a mock script, exclusive of continuation lines."
  (interactive "nGoto line: ")
  (goto-char (point-min))
  (while (> n 1)
    (unless (search-forward-regexp "\\\\$" (line-end-position) t)

;; Author: Dan Harms <dan.harms@xrtrading.com>
;; Created: Wednesday, June 10, 2015
;; Version: 1.2
;; Modified Time-stamp: <2016-05-10 15:22:04 dan.harms>
;; Keywords: mock script

;;; Code:
