From eeb709a2c0a40366f0f03f332f799f0f252d0cf3 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Sun, 23 Feb 2020 23:02:44 +0000
Subject: signel: ignore-error is unreleased

---
 net/signel.org | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/net/signel.org b/net/signel.org
index 89c9b16..799a975 100644
--- a/net/signel.org
+++ b/net/signel.org
@@ -172,12 +172,12 @@ envelopes:
 
 #+begin_src emacs-lisp
 (defun signel--msg-contents (str)
-  (cdr (assoc 'envelope (ignore-error 'json-parse-error
-                          (json-parse-string str
-                                             :null-object nil
-                                             :false-object nil
-                                             :object-type 'alist
-                                             :array-type 'list)))))
+  (alist-get 'envelope
+             (ignore-errors (json-parse-string str
+                                               :null-object nil
+                                               :false-object nil
+                                               :object-type 'alist
+                                               :array-type 'list))))
 #+end_src
 
 Here i am being old-school and opting to receive JSON dicitionaries as
-- 
cgit v1.2.3