[bot] Auto-update (#14573)

* documentation formatting: Mon Apr 5 20:50:44 UTC 2021

* Built-in files auto-update: Mon Apr 5 20:49:17 UTC 2021

core/libs/ido-vertical-mode.el

@@ -158,8 +158,8 @@ so we can restore it when turning `ido-vertical-mode' off")
    " [Too big]"
    " [Confirm]"
    (concat "\n" indicator padding)                                           ; left bracket around the sole remaining completion
-   ""))                                                                        ; right bracket around the sole remaining completion
-
+   ""                                                                        ; right bracket around the sole remaining completion
+   ))
 
 (defun ido-vertical-or-horizontal-completions (name)
   (if (and ido-vertical-disable-if-short
@@ -318,7 +318,7 @@ so we can restore it when turning `ido-vertical-mode' off")
 
 (defun ido-vertical-disable-line-truncation ()
   "Prevent the newlines in the minibuffer from being truncated"
-  (setq-local truncate-lines nil))
+  (set (make-local-variable 'truncate-lines) nil))
 
 (defun ido-vertical-turn-on ()
   (if (and (eq nil ido-vertical-old-decorations)

core/libs/quelpa.el

@@ -900,15 +900,25 @@ Return a cons cell whose `car' is the root and whose `cdr' is the repository."
   (quelpa-build--run-process-match
    "Fetch URL: \\(.*\\)" dir "git" "remote" "show" "-n" remote))
 
+(defvar quelpa--git-version :uninitialized)
+
 (defun quelpa-build--checkout-git (name config dir)
   "Check package NAME with config CONFIG out of git into DIR."
-  (let* ((repo (plist-get config :url))
+  (let* ((version-regexp-alist `(,@version-regexp-alist ("^[-._+ ]?.*$" . 0)))
+         (git-version (or (when (not (eq quelpa--git-version :uninitialized))
+                            quelpa--git-version)
+                          (setq quelpa--git-version (version-to-list
+                                                     (quelpa-build--run-process-match
+                                                      "git version \\(.*\\)"
+                                                      nil "git" "version")))))
+         (repo (plist-get config :url))
          (remote (or (plist-get config :remote) "origin"))
          (commit (or (plist-get config :commit)
                      (when-let ((branch (plist-get config :branch)))
                        (concat remote "/" branch))))
          (depth (or (plist-get config :depth) quelpa-git-clone-depth))
-         (partial (or (plist-get config :partial) quelpa-git-clone-partial))
+         (partial (and (or (plist-get config :partial) quelpa-git-clone-partial)
+                       (version-list-<= '(2 20) git-version)))
          (force (plist-get config :force))
          (use-current-ref (plist-get config :use-current-ref)))
     (when (string-match (rx bos "file://" (group (1+ anything))) repo)

layers/+web-services/pocket/README.org

@@ -4,7 +4,7 @@
 
 [[file:img/pocket.png]]
 
-* Table of Contents                                       :TOC_5_gh:noexport:
+* Table of Contents                     :TOC_5_gh:noexport:
 - [[#description][Description]]
   - [[#features][Features:]]
 - [[#install][Install]]
@@ -24,13 +24,13 @@ This layer adds [[https://getpocket.com/][Pocket]] support to Spacemacs via the
   status, etc.
 
 * Install
-To use this configuration layer, add it to your =~/.spacemacs=.  You
+To use this configuration layer, add it to your =~/.spacemacs=. You
 will need to add =pocket= to the existing
 =dotspacemacs-configuration-layers= list in this file.
 
 * Authentication
-Just run the =pocket-reader= command.  A URL will be copied to the
-clipboard/kill ring.  Open the URL in a web browser and follow the
+Just run the =pocket-reader= command. A URL will be copied to the
+clipboard/kill ring. Open the URL in a web browser and follow the
 instructions to log into your Pocket account.
 
 Note: Please ignore any =Page Not Found= error you might see on the
@@ -41,9 +41,9 @@ authorization completed by checking the file
 
 * Key bindings
 
-| Key binding | Description                                                       |
-|-------------+-------------------------------------------------------------------|
-| ~SPC a w p~ | Open pocket-reader buffer                                         |
+| Key binding | Description               |
+|-------------+---------------------------|
+| ~SPC a w p~ | Open pocket-reader buffer |
 
 ** Bindings in pocket-reader buffer
 

layers/LAYERS.org

@@ -183,7 +183,6 @@
   - [[#elfeed][Elfeed]]
   - [[#epub][Epub]]
   - [[#pdf][PDF]]
-  - [[#pocket][Pocket]]
   - [[#speed-reading][Speed Reading]]
 - [[#readmeorg-files-that-need-proper-tags][README.org files that need proper tags]]
   - [[#languagetool][LanguageTool]]
@@ -254,6 +253,7 @@
   - [[#confluence][Confluence]]
   - [[#eaf][Eaf]]
   - [[#evernote][Evernote]]
+  - [[#pocket][Pocket]]
   - [[#search-engine][Search Engine]]
   - [[#twitter][Twitter]]
   - [[#wakatime][Wakatime]]
@@ -2452,26 +2452,6 @@ Features:
 - Manipulate annotations.
 - Fit PDF to screen.
 
-** Pocket
-[[file:+readers/pocket/README.org]]
-
-This layer adds [[https://getpocket.com/][Pocket]] support to Spacemacs via the package
-[[https://github.com/alphapapa/pocket-reader.el][pocket-reader]].
-
-#+begin_quote
-This is a client for Pocket (getpocket.com). It allows you to manage
-your reading list: add, remove, delete, tag, view, favorite,
-etc. Doing so in Emacs with the keyboard is fast and efficient. Links
-can be opened in Emacs with any function, or in external browsers, and
-specific sites/URLs can be opened with specific browser
-functions. Views can be sorted by date, title, domain, tags, favorite,
-etc, and “limited” mutt-style. Items can be searched for using
-keywords, tags, favorite status, unread/archived status, etc. Items
-can optionally be colorized by site, making it easy to tell which
-items come from different sites. Items are grouped depending on the
-sort column.
-#+end_quote
-
 ** Speed Reading
 [[file:+readers/speed-reading/README.org][+readers/speed-reading/README.org]]
 
@@ -3235,6 +3215,19 @@ Features:
 - Search for notes using keywords
 - Move notes between notebooks
 
+** Pocket
+[[file:+web-services/pocket/README.org][+web-services/pocket/README.org]]
+
+This layer adds [[https://getpocket.com/][Pocket]] support to Spacemacs via the package
+[[https://github.com/alphapapa/pocket-reader.el][pocket-reader]].
+
+Features:
+- Manage reading list: add, remove, delete, tag, view, favorite, etc.
+- Open links in Emacs or external browser
+- Sort views by date, title, domain, tags, favorite, etc.
+- Search items by keywords, tags, favorite status, unread/archived
+  status, etc.
+
 ** Search Engine
 [[file:+web-services/search-engine/README.org][+web-services/search-engine/README.org]]