Just add "[wiki]" etc to package descriptions, not "[source: wiki]"

This commit is contained in:
Steve Purcell 2013-05-09 12:31:52 +01:00
parent e4e496cc06
commit d9ccbfc38d
2 changed files with 2 additions and 2 deletions

View file

@ -17,7 +17,7 @@
package.url = "packages/#{package.name}-#{package.version}." + (package.pkgtype == "single" ? "el" : "tar") package.url = "packages/#{package.name}-#{package.version}." + (package.pkgtype == "single" ? "el" : "tar")
package.recipe_url = "https://github.com/milkypostman/melpa/blob/master/recipes/#{package.name}" package.recipe_url = "https://github.com/milkypostman/melpa/blob/master/recipes/#{package.name}"
package.source = recipe["fetcher"] package.source = recipe["fetcher"]
if package.descr =~ /(.*?)(\s*-\*-.*?)?\s*\[source:\s*(\w+)\]\s*/ if package.descr =~ /(.*?)(\s*-\*-.*?)?\s*\[(\w+)\]\s*/
package.descr = $1 package.descr = $1
end end

View file

@ -563,7 +563,7 @@ If PKG-INFO is nil, an empty one is created."
(let* ((merged (or (copy-sequence pkg-info) (let* ((merged (or (copy-sequence pkg-info)
(vector name nil "No description available." version)))) (vector name nil "No description available." version))))
(aset merged 0 name) (aset merged 0 name)
(aset merged 2 (format "%s [source: %s]" (aset merged 2 (format "%s [%s]"
(aref merged 2) (plist-get config :fetcher))) (aref merged 2) (plist-get config :fetcher)))
(aset merged 3 version) (aset merged 3 version)
merged)) merged))