Archive

と言っても大したことではありません。指定した範囲(リージョン)をMarkdownで変換し、別バッファに書き出すだけです。一部分だけをHTML化するのに便利なんで使用してます。

コードの中で

(call-process-region from
                     to
                     "markdown"
                     nil
                     buffer-output
                     nil)

の”markdown”とある部分については”C:\Program Files\markdown\markdown.pl”とか 実行できる形式に直してやってください。以下スクリプト。

(defun markdown (from to)
  (interactive "r")
  (if (> from to)
      (rotatef from to))
  (let ((buffer-output (get-buffer-create "*markdown*")))
        (with-current-buffer buffer-output
          (erase-buffer))
        (call-process-region from
                             to
                             "markdown"
                             nil
                             buffer-output
                             nil)
        (switch-to-buffer-other-window buffer-output)))