emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] master bd55cd4: * emacs-lisp/package.el: Spelling fixes an


From: Paul Eggert
Subject: [Emacs-diffs] master bd55cd4: * emacs-lisp/package.el: Spelling fixes and use active voice.
Date: Wed, 01 Apr 2015 17:22:25 +0000

branch: master
commit bd55cd4d246c031151dc338813cb9c8ca5ea33dd
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>

    * emacs-lisp/package.el: Spelling fixes and use active voice.
---
 lisp/ChangeLog             |    4 ++++
 lisp/emacs-lisp/package.el |   27 +++++++++++++--------------
 2 files changed, 17 insertions(+), 14 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b35c78d..46f519e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2015-04-01  Paul Eggert  <address@hidden>
+
+       * emacs-lisp/package.el: Spelling fixes and use active voice.
+
 2015-04-01  Artur Malabarba  <address@hidden>
 
        * emacs-lisp/package.el: Implement asynchronous refreshing.
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 490fb45..583598e 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1084,11 +1084,11 @@ buffer is killed afterwards.  Return the last value in 
BODY."
 
 (defmacro package--with-work-buffer-async (location file async &rest body)
   "Run BODY in a buffer containing the contents of FILE at LOCATION.
-If ASYNC is non-nil, and if it is possible, the operation is run
+If ASYNC is non-nil, and if it is possible, run BODY
 asynchronously.  If an error is encountered and ASYNC is a
-function, it is called with no arguments (instead of executing
-body), otherwise the error is propagated.  For description on the
-other arguments see `package--with-work-buffer'."
+function, call it with no arguments (instead of executing BODY),
+otherwise propagate the error.  For description of the other
+arguments see `package--with-work-buffer'."
   (declare (indent 3) (debug t))
   `(if (or (not ,async)
            (not (string-match-p "\\`https?:" ,location)))
@@ -1139,7 +1139,7 @@ errors."
 
 (defun package--check-signature (location file &optional string async callback)
   "Check signature of the current buffer.
-Signature file is downloaded from LOCATION by appending \".sig\"
+Download the signature file from LOCATION by appending \".sig\"
 to FILE.
 GnuPG keyring is located under \"gnupg\" in `package-user-dir'.
 STRING is the string to verify, it defaults to `buffer-string'.
@@ -1407,8 +1407,8 @@ similar to an entry in `package-alist'.  Save the cached 
copy to
 (defun package--download-and-read-archives (&optional async)
   "Download descriptions of all `package-archives' and read them.
 This populates `package-archive-contents'.  If ASYNC is non-nil,
-the downloads are performed asynchronously."
-  ;; The dowloaded archive contents will be read as part of
+perform the downloads asynchronously."
+  ;; The downloaded archive contents will be read as part of
   ;; `package--update-downloads-in-progress'.
   (setq package--downloads-in-progress package-archives)
   (dolist (archive package-archives)
@@ -1423,8 +1423,8 @@ the downloads are performed asynchronously."
 For each archive configured in the variable `package-archives',
 inform Emacs about the latest versions of all packages it offers,
 and make them available for download.
-Optional argument, ASYNC, specifies whether the downloads should
-be performed in the background."
+Optional argument ASYNC specifies whether to perform the
+downloads in the background."
   (interactive)
   ;; FIXME: Do it asynchronously.
   (unless (file-exists-p package-user-dir)
@@ -2763,7 +2763,7 @@ Store this list in `package-menu--new-package-list'."
     (setq package-menu--old-archive-contents nil)))
 
 (defun package-menu--find-and-notify-upgrades ()
-  "Notify the user of upgradeable packages."
+  "Notify the user of upgradable packages."
   (when-let ((upgrades (package-menu--find-upgrades)))
     (message "%d package%s can be upgraded; type `%s' to mark %s for 
upgrading."
       (length upgrades)
@@ -2772,10 +2772,9 @@ Store this list in `package-menu--new-package-list'."
       (if (= (length upgrades) 1) "it" "them"))))
 
 (defun package-menu--post-refresh ()
-  "Function to be called after `package-refresh-contents' is done.
-Checks for new packages, reverts the *Packages* buffer, and
-checks for upgrades.
-This goes in `package--post-download-archives-hook', so that it
+  "Check for new packages, revert the *Packages* buffer, and check for 
upgrades.
+This function is called after `package-refresh-contents' is done.
+It goes in `package--post-download-archives-hook', so that it
 works with async refresh as well."
   (package-menu--populate-new-package-list)
   (let ((buf (get-buffer "*Packages*")))



reply via email to

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