                            (+ (line-beginning-position)
                               (1- (string-to-number (match-string 4 line)))))
                     (match-string 5 line))))))
-
--
-;; Requirements
 
 (defun shm/kill-region (beg end)
   "Kill the region, and save it in the clipboard."


;;; Code:


;; Requirements

(require 'shm-customizations)
(require 'shm-ast-documentation)
(require 'shm-evaporate)

(require 'cl)


;; Mode

(defvar shm-map
  (let ((map (make-sparse-keymap)))

                   ',fallback)
          (call-interactively ',fallback))))))

(defun shm-mode-start ()
  "Start the minor mode."
  (set (make-local-variable 'shm-decl-asts)
