update packages

lisp/magit/magit-stash.el

@@ -87,7 +87,7 @@ AUTHOR-WIDTH has to be an integer.  When the name of the author
 
 ;;; Commands
 
-;;;###autoload (autoload 'magit-stash "magit-stash" nil t)
+;;;###autoload(autoload 'magit-stash "magit-stash" nil t)
 (transient-define-prefix magit-stash ()
   "Stash uncommitted changes."
   :man-page "git-stash"
@@ -234,7 +234,7 @@ while two prefix arguments are equivalent to `--all'."
   (magit-stash-save (concat "WIP on " (magit-stash-summary))
                     index worktree untracked refresh t))
 
-;;;###autoload (autoload 'magit-stash-push "magit-stash" nil t)
+;;;###autoload(autoload 'magit-stash-push "magit-stash" nil t)
 (transient-define-prefix magit-stash-push (&optional transient args)
   "Create stash using \"git stash push\".
 
@@ -448,7 +448,7 @@ Then apply STASH, dropping it if it applies cleanly."
     (unless noerror
       (user-error "No %s changes to save" (cond ((not index)  "unstaged")
                                                 ((not worktree) "staged")
-                                                (t "local"))))))
+                                                ("local"))))))
 
 (defun magit-stash-store (message ref rev)
   (magit-update-ref ref message rev))
@@ -681,4 +681,15 @@ that make up the stash."
 
 ;;; _
 (provide 'magit-stash)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("and>"         . "cond-let--and>")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
 ;;; magit-stash.el ends here