   (interactive "P")
   (zomp-move-until-same-or-less-indent 'previous-line))
 
-
 (defun zomp-setup ()
   (setq comment-start "//")
   (setq comment-start-skip "// *")

  (local-set-key [(?:)] '(lambda () (interactive)
                           (zomp-indent-line)
                           (insert ":")))

  (local-set-key [(control c)(control l)] '(lambda () (interactive)
                                             (zomp-tl-do "!")))

  ;; create zomp menu. order of the zomp-add-action commands is reversed order in menu
  (local-set-key [menu-bar zomp] (cons "Zomp" (make-sparse-keymap "Zomp")))

")
  (zomp-tl-move-point-to-end))

(defun zomp-tl-discard-input ()
  (interactive)
  (zomp-tl-do "!"))

(defun zomp-tl-run-test ()
  (interactive)
  (message "Running function test")
