ryuslash/emacs-config
1
0
Fork 0
Code Activity

Add temporary fix for ‘package-maint-add-news-item’

Browse source 
Until I get my copyright assignment sorted for the FSF I can’t send
this to them. Once I’ve sorted it out I will send this fix in.
This commit is contained in:
Tom Willemse 2019-01-13 12:45:15 -08:00
parent 96888f9f97
commit b587309c43
1 changed files with 15 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
oni-package.el
View file

@ -4,7 +4,7 @@
;; Author: Tom Willemse <tom@ryuslash.org> ;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local ;; Keywords: local
;; Version: 20190113123701 ;; Version: 20190113124225
;; This program is free software; you can redistribute it and/or modify ;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by ;; it under the terms of the GNU General Public License as published by
@ -52,6 +52,20 @@
(setq package-archive-upload-base (setq package-archive-upload-base
"/ssh:slash@ryuslash.org:usr/share/emacs/elpa/") "/ssh:slash@ryuslash.org:usr/share/emacs/elpa/")
;;; Temporary fix for `package-maint-add-news-item', until I get my
;;; Copyright assignment back in order.
(defun package-maint-add-news-item (title description archive-url)
"Add a news item to the webpages associated with the package archive.
TITLE is the title of the news item.
DESCRIPTION is the text of the news item."
(interactive "sTitle: \nsText: \nsArchive URL: ")
(package--update-file "elpa.rss"
"<description>"
(package--make-rss-entry title description archive-url))
(package--update-file "news.html"
"New entries go here"
(package--make-html-entry title description)))
;;;###autoload (with-eval-after-load 'package (require 'oni-package)) ;;;###autoload (with-eval-after-load 'package (require 'oni-package))
;;;###autoload (with-eval-after-load 'package-x (require 'oni-package)) ;;;###autoload (with-eval-after-load 'package-x (require 'oni-package))