archive/.emacs.d/snippets/python-mode/text-mode/posted


1
2
3
4

`(let ((raw-git (shell-command-to-string "git diff-index --cached HEAD")))
  (if (string-match "\\([^ 	]*\\.\\)org" raw-git)
      (concat "/" (match-string 1 raw-git) "html posted")
    ""))`