emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 9e177bf 268/271: Update headers and documentation for down


From: Jackson Ray Hamilton
Subject: [elpa] master 9e177bf 268/271: Update headers and documentation for download-dependencies.el.
Date: Thu, 05 Feb 2015 18:31:57 +0000

branch: master
commit 9e177bfae3249b0092fbfb59b1ba895875be227a
Author: Jackson Ray Hamilton <address@hidden>
Commit: Jackson Ray Hamilton <address@hidden>

    Update headers and documentation for download-dependencies.el.
---
 scripts/download-dependencies.el |   16 ++++++++++++++--
 1 files changed, 14 insertions(+), 2 deletions(-)

diff --git a/scripts/download-dependencies.el b/scripts/download-dependencies.el
index 37f243b..54211cc 100644
--- a/scripts/download-dependencies.el
+++ b/scripts/download-dependencies.el
@@ -1,4 +1,4 @@
-;; -*- lexical-binding: t; -*-
+;;; scripts/download-dependencies.el --- Get files for development. -*- 
lexical-binding: t; -*-
 
 ;; Copyright (C) 2014-2015  Free Software Foundation, Inc.
 
@@ -17,17 +17,27 @@
 ;; You should have received a copy of the GNU General Public License
 ;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-(defconst directory (file-name-directory (or load-file-name buffer-file-name)))
+;; This script downloads some dependencies for development so they don't need 
to
+;; be version-controlled.
+
+;;; Code:
+
+(defconst directory (file-name-directory (or load-file-name buffer-file-name))
+  "This file's directory.")
 
 (defun resolve-path (path)
+  "Resolve a path relative to this file's directory."
   (expand-file-name path directory))
 
 (defun strip-headers ()
+  "Remove the http headers included in the output of
+`url-retrieve-synchronously'."
   (goto-char 1)
   (kill-paragraph 1) ; The headers are 1 paragraph. I hope.
   (kill-line)        ; A line separates the headers from the file's content.
   )
 
+;; Download any missing dependencies.
 (let ((files 
'("https://raw.githubusercontent.com/mooz/js2-mode/master/js2-mode.el";
                
"https://raw.githubusercontent.com/rejeep/ert-async.el/master/ert-async.el";)))
   (make-directory (resolve-path "../libraries") t)
@@ -38,3 +48,5 @@
         (with-current-buffer (url-retrieve-synchronously file)
           (strip-headers)
           (write-file destination))))))
+
+;;; download-dependencies.el ends here



reply via email to

[Prev in Thread] Current Thread [Next in Thread]