[elpa] externals/ement 66b32b9e17 3/4: Fix: (ement--sync) Retry for network timeouts

[ELPA Syncer]

branch: externals/ement
commit 66b32b9e17a45836f608dca4e082df9b0766adad
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Fix: (ement--sync) Retry for network timeouts
    
    Accidentally broken in 850f6b277226a6b164cce30ccaf6aa499fe46fe4.
---
 README.org | 3 ++-
 ement.el   | 2 +-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/README.org b/README.org
index a70a11a213..af82033a8d 100644
--- a/README.org
+++ b/README.org
@@ -303,7 +303,8 @@ Note that, while ~matrix-client~ remains usable, and 
probably will for some time
 *Fixes*
 
 + Command ~ement-view-space~ when called from a room buffer.  (Thanks to 
[[https://github.com/MagicRB][Richard Brežák]] for reporting.)
-+ Don't call ~display-buffer~ when reverting room list buffer.  (Fixes 
[[https://github.com/alphapapa/ement.el/issues/121][#121]].  Thanks to 
[[https://github.com/mekeor][mekeor]] for reporting.) 
++ Don't call ~display-buffer~ when reverting room list buffer.  (Fixes 
[[https://github.com/alphapapa/ement.el/issues/121][#121]].  Thanks to 
[[https://github.com/mekeor][mekeor]] for reporting.)
++ Retry sync for network timeouts.  (Accidentally broken in v0.6.) 
 
 *Internal*
 
diff --git a/ement.el b/ement.el
index 9fd8d2eddd..fa2cc3482e 100644
--- a/ement.el
+++ b/ement.el
@@ -461,7 +461,7 @@ a filter ID).  When unspecified, the value of
                                              (pcase (plz-response-status 
response)
                                                ((or 429 502) (setf reason 
"failed")))))
                                           ((pcase curl-error
-                                             (28 (setf reason "timed out")))))
+                                             (`(28 . ,_) (setf reason "timed 
out")))))
                                     (if reason
                                         (if (not ement-auto-sync)
                                             (run-hook-with-args 
'ement-interrupted-sync-hook session)