1 files changed, 10 insertions, 0 deletions
diff --git a/dh-elpa.el b/dh-elpa.el
index f16c73b..5f799b9 100644
--- a/dh-elpa.el
+++ b/dh-elpa.el
@@ -45,6 +45,16 @@
     (package--make-autoloads-and-stuff pkg-desc pkg-dir)
     pkg-dir))
 
+;; Write out (partial) package description in a form easily parsed by
+;; non-lisp tools.
+(defun dhelpa-write-desc (desc dest)
+  (let* ((name (package-desc-name desc))
+	 (version (package-version-join (package-desc-version desc)))
+	 (desc-file (expand-file-name (format "%s.desc" name) dest)))
+    (with-temp-file desc-file
+      (insert (format "ELPA-Name: %s\n" name))
+      (insert (format "ELPA-Version: %s\n" version)))))
+
 ;;;###autoload
 (defun dhelpa-install-from-buffer (destdir)
   "Install a package from the current buffer.