From 09a5dd862832ffe82914baeab0ba7d4a0ab5fb62 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Thu, 18 Nov 2021 15:05:47 +0100 Subject: [PATCH] String backslash corrections * lisp/net/shr.el (shr-tag-video): Remove ineffective backslash. * test/lisp/emacs-lisp/package-tests.el (package-test-macro-compilation-gz): Make dot literal as intended. --- lisp/net/shr.el | 2 +- test/lisp/emacs-lisp/package-tests.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/net/shr.el b/lisp/net/shr.el index b9e8a18e25a..5a36f19c5f1 100644 --- a/lisp/net/shr.el +++ b/lisp/net/shr.el @@ -1697,7 +1697,7 @@ The preference is a float determined from `shr-prefer-media-type'." (xwidget-webkit-execute-script widget (format "document.body.innerHTML = %S;" (format - "
" + "
" url))))) ;; No xwidgets. (if (> (length image) 0) diff --git a/test/lisp/emacs-lisp/package-tests.el b/test/lisp/emacs-lisp/package-tests.el index 3b12f57e5ce..efa9f834110 100644 --- a/test/lisp/emacs-lisp/package-tests.el +++ b/test/lisp/emacs-lisp/package-tests.el @@ -383,7 +383,7 @@ but with a different end of line convention (bug#48137)." (mapc #'delete-file (directory-files-recursively dir "\\`[^\\.].*\\.elc\\'")) (mapc (lambda (f) (call-process "gunzip" nil nil nil f)) - (directory-files-recursively dir "\\`[^\\.].*\\.el.gz\\'")))))) + (directory-files-recursively dir "\\`[^\\.].*\\.el\\.gz\\'")))))) (ert-deftest package-test-install-two-dependencies () "Install a package which includes a dependency." -- 2.39.2