;;; Handy code for uploading new versions of my own packages to marmalade

(autoload 'marmalade-upload-buffer "marmalade")

(defun latest-git-tag ()
  (replace-regexp-in-string
   "[ \t\n]*$"
   ""
   (shell-command-to-string "git tag|sort -n|tail -1"))) ;; TODO: sort versions properly

(defun update-version-header (val)
  (save-excursion
    (beginning-of-buffer)
    (re-search-forward "^;;;? ?Version:")
    (kill-line)
    (insert " " val)))

(defun submit-to-marmalade (buf)
  (interactive "bSubmit buffer: ")
  (with-current-buffer buf
    (let ((tag (latest-git-tag)))
      (unless tag
        (error "Not tagged"))
      (update-version-header tag)
      (marmalade-upload-buffer buf))))


(provide 'init-marmalade)

;;; Handy code for uploading new versions of my own packages to marmalade

(autoload 'marmalade-upload-buffer "marmalade")

(defun latest-git-tag ()
  (replace-regexp-in-string
   "[ \t\n]*$"
   ""
   (shell-command-to-string "git tag|sort -n|tail -1"))) ;; TODO: sort versions properly

(defun update-version-header (val)
  (save-excursion
    (beginning-of-buffer)
    (re-search-forward "^;;;? ?Version:")
    (kill-line)
    (insert " " val)))

(defun submit-to-marmalade (buf)
  (interactive "bSubmit buffer: ")
  (with-current-buffer buf
    (let ((tag (latest-git-tag)))
      (unless tag
        (error "Not tagged"))
      (update-version-header tag)
      (marmalade-upload-buffer buf)
      (revert-buffer t t)
      (message "Submitted version %s to marmalade" tag))))


(provide 'init-marmalade)

Revert source buffer after submitting to maramalade
Revert source buffer after submitting to maramalade

Guoozz/emacs.d,emuio/emacs.d,mpwang/emacs.d,ernest-dzf/emacs.d,zuoshifan/emacs.d,Enzo-Liu/emacs.d,atreeyang/emacs.d,qinshulei/emacs.d,fengxl/emacs.d,scorpionis/emacs.d,jachinpy/emacs.d,zuoshifan/emacs.d,braveoyster/emacs.d,farzadbekran/emacs.d,sgarciac/emacs.d,jhpx/emacs.d,zuoshifan/emacs.d,wegatron/emacs.d,ruiyang/emacs.d,shafayetkhan/emacs.d,cjqw/emacs.d,zuoshifan/emacs.d,zhaotai/.emacs.d,jachinpy/emacs.d,blueseason/emacs.d,hophacker/emacs.d,dcorking/emacs.d,ruiyang/emacs.d,zuoshifan/emacs.d,qianwan/emacs.d,Togal/emacs.d,hkcqr/emacs.d,46do14/emacs.d,YangXin/emacs.d,farzadbekran/emacs.d,Werewolflsp/emacs.d,zuoshifan/emacs.d,caoyuanqi/emacs.d,pairyo/emacs.d,LKI/emacs.d,kongfy/emacs.d,arthurl/emacs.d,mmqmzk/emacs.d,zuoshifan/emacs.d,wenpincui/emacs.d,lust4life/emacs.d,cyjia/emacs.d,farzadbekran/emacs.d,lujianmei/emacs.d,zuoshifan/emacs.d,gsmlg/emacs.d,purcell/emacs.d,whizzzkid/emacs.d,krzysz00/emacs.d,dhanunjaya/emacs.d,jthetzel/emacs.d,LittleLmp/emacs.d,bibaijin/emacs.d,zhuoyikang/emacs.d,danfengcao/emacs.d,farzadbekran/emacs.d,blueabysm/emacs.d,Jadecity/PurcellEmacs.d,ilove0518/emacs.d,alant/emacs.d,DarkThrone/emacs.d,Shanicky/emacs.d,zuoshifan/emacs.d,renatoriccio/emacs.d,zenith-john/emacs.d,roxolan/emacs.d,YangXin/emacs.d,benkha/emacs.d,carlosliu/emacs.d,boblannon/emacs.d,farzadbekran/emacs.d,dongdonghu/.emacs.d,jkaessens/emacs.d,baohaojun/emacs.d,lromang/emacs.d,haodaivshen/emacs.d,exclamaforte/emacs.d,me020523/emacs.d,svenyurgensson/emacs.d,modkzs/emcs.d,kindoblue/emacs.d