 ;;; Since I use rvm you'll need rvm.el from here https://github.com/senny/rvm.el
 ;;; Uncommenthing this _might_ work (untested)
 ;;; (defun rvm-use-default () ".") (provide 'rvm)
+
+;;; I bind some things to keys like this:
+;;; (global-set-key [(control f1)]		'view-file-in-browser)
+;;; (global-set-key [(shift control f1)]	'copy-file-url-to-clipboard)
 
 ;;; Code:
 

  (ark-reuse-or-start-server file-name 'jekyll-server-start 'jekyll-fix-path-name)
  )


(defun view-file-in-browser (&optional file-name)
  "Open up file in one of four ways.

          "\"")
        nil 0))))

(defun copy-file-url-to-clipboard (&optional file-name)
  "Put the url to access FILE-NAME in the copy buffer."
  (interactive (list (buffer-file-name)))
  (call-process-shell-command (concat (shell-command-to-get-file-url file-name) " | pbcopy")))

(provide 'github-markdown-server)
;;; github-markdown-server ends here
