os-github.el: fix list/headline bug.
authorAurélien Aptel <k@b0.cx>
Fri, 10 Aug 2012 16:51:39 +0000 (18:51 +0200)
committerAurélien Aptel <k@b0.cx>
Fri, 10 Aug 2012 16:51:39 +0000 (18:51 +0200)
os-github.el

index 13e963d..09c7303 100644 (file)
@@ -209,8 +209,10 @@ JSON response."
       (match-string 1 url)
     "<project name>"))
 
+;; XXX: we need an actual markdown parser here...
 (defun os-github-filter-desc (desc)
   "Return a filtered description of a GitHub description."
+  (setq desc (replace-regexp-in-string "^\\*" "-" desc))
   (replace-regexp-in-string "\\([^ \t\n]\\)[ \t\n]*\\'"
                             "\\1\n"
                             (replace-regexp-in-string "\r\n" "\n" desc)))