-;; Time-stamp: <2015-06-17 11:39:05 kmodi>
+;; Time-stamp: <2015-07-16 12:35:51 kmodi>
 
 ;; Outshine
 ;; https://github.com/tj64/outshine

                           (delete-region p1 p2))))
                     (not (looking-at "^\n"))))
            ;; Then print table of contents
            (insert (format "%s\n" parsed-outline-comment-start))
            (let ((n 1))
              (dolist (h headings-list)
                ;; (insert (format "// %2d. %s\n" n heading))
                (insert (format "%s %s%s\n"
                                parsed-outline-comment-start
                                (replace-regexp-in-string
                                 "\\*" "  " (pop stars-list))
                                h))
                (setq n (1+ n))))))))

    (defvar modi/outline-mode-hooks '(verilog-mode-hook
                                      emacs-lisp-mode-hook)

                          ;; trim white space from comment-start
                          (replace-regexp-in-string " " "" comment-start)))
                       "\\)"))
              (el-mode (derived-mode-p 'emacs-lisp-mode))
              parsed-outline-comment-start
              headings-list stars-list
              heading star)
