hoersten-pastebin-region.el
changeset 4 0fda818a8b6a
parent 1 ede059431d20
child 8 f16b95667aa6
equal deleted inserted replaced
3:47d5df23c502 4:0fda818a8b6a
     1 ;; ~/.emacs.d/hoersten-pastebin-region.el - Luke Hoersten - v0.6
     1 ;; ~/.emacs.d/hoersten-pastebin-region.el
       
     2 ;; Luke Hoersten <[email protected]>
     2 
     3 
     3 ;; custom keys
     4 ;; custom keys
     4 (global-set-key (kbd "C-c w") 'pastebin-region)
     5 (global-set-key (kbd "C-c w") 'pastebin-region)
     5 
     6 
     6 ;; Based on http://www.emacswiki.org/cgi-bin/wiki/download/pastebin.el
     7 ;; Based on http://www.emacswiki.org/cgi-bin/wiki/download/pastebin.el
    31                                    (let ((redirected (cadr arg)))
    32                                    (let ((redirected (cadr arg)))
    32                                      (message redirected)
    33                                      (message redirected)
    33                                      (with-temp-buffer
    34                                      (with-temp-buffer
    34                                        (insert redirected)
    35                                        (insert redirected)
    35                                        (clipboard-kill-ring-save (point-min) (point-max))))))))))
    36                                        (clipboard-kill-ring-save (point-min) (point-max))))))))))
       
    37 
       
    38 (provide 'hoersten-pastebin-region)