Begrudgingly stop using wrongly deprecated when-let

2 files changed, 5 insertions, 6 deletions

diff --git a/Makefile b/Makefile
index 67caa4b..a163ce1 100644
--- a/Makefile
+++ b/Makefile
@@ -16,9 +16,7 @@ LOAD_PATH ?= $(addprefix -L ../,$(DEPS))
 LOAD_PATH += -L .
 
 EMACS       ?= emacs
-EMACS_ARGS ?= --eval "(progn \
-  (put 'if-let 'byte-obsolete-info nil) \
-  (put 'when-let 'byte-obsolete-info nil))"
+EMACS_ARGS  ?=
 EMACS_Q_ARG ?= -Q
 EMACS_BATCH ?= $(EMACS) $(EMACS_Q_ARG) --batch $(EMACS_ARGS) $(LOAD_PATH)
 
diff --git a/llama.el b/llama.el
index 692df96..5a7797e 100644
--- a/llama.el
+++ b/llama.el
@@ -354,9 +354,10 @@ expansion, and the looks of this face should hint at that.")
            (prog1 t
              (save-excursion
                (goto-char (match-beginning 0))
-               (when-let ((_(save-match-data (not (nth 8 (syntax-ppss)))))
-                          (expr (ignore-errors
-                                  (read-positioning-symbols (current-buffer)))))
+               (when-let*
+                   ((_(save-match-data (not (nth 8 (syntax-ppss)))))
+                    (expr (ignore-errors
+                            (read-positioning-symbols (current-buffer)))))
                  (put-text-property (match-beginning 0) (point)
                                     'font-lock-multiline t)
                  (llama--fontify (cdr expr) nil nil t)))))