Emacs 25.1 fixes

diff --git a/elisp/reader.el b/elisp/reader.el
index 26d8361..e63b1aa 100644 (file)
--- a/elisp/reader.el
+++ b/elisp/reader.el
@@ -1,3 +1,8 @@
+;; HACK: `text-quoting-style' prettifies quotes in error messages on
+;; Emacs 25.1, but no longer does from 25.2 upwards...
+(when (and (= emacs-major-version 25) (= emacs-minor-version 1))
+  (setq text-quoting-style 'grave))
+
 (defvar tokens nil)
 
 (defun peek ()

diff --git a/elisp/tests/stepA_mal.mal b/elisp/tests/stepA_mal.mal
index a6c9bca..8f6e9a3 100644 (file)
--- a/elisp/tests/stepA_mal.mal
+++ b/elisp/tests/stepA_mal.mal
@@ -16,6 +16,6 @@
 ; Hello World!
 ;=>nil
 
-(elisp-eval "(setq emacs-version-re (rx \"24.\" digit \".\" digit))")
+(elisp-eval "(setq emacs-version-re (rx (+ digit) \".\" digit \".\" digit))")
 (elisp-eval "(and (string-match-p emacs-version-re emacs-version) t)")
 ;=>true