[AUCTeX-diffs] GNU AUCTeX branch, master, updated. dcfdd6973d5471f68d9df9b530c0c4a2687febf4

[Ikumi Keita]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU AUCTeX".

The branch, master has been updated
       via  dcfdd6973d5471f68d9df9b530c0c4a2687febf4 (commit)
      from  f319b9f1189d21927c0577a3280db4c2c99928be (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit dcfdd6973d5471f68d9df9b530c0c4a2687febf4
Author: Ikumi Keita <address@hidden>
Date:   Sat Jan 5 19:38:43 2019 +0900

    Fix test conditions on w32
    
    * tests/tex/command-expansion.el (TeX-command-detokenize): Correct
    `system-type' for w32.
    (TeX-command-expand-skip-file-name, TeX-command-expand-active-master):
    Skip tests on w32.

diff --git a/tests/tex/command-expansion.el b/tests/tex/command-expansion.el
index dd1f09b..0de5831 100644
--- a/tests/tex/command-expansion.el
+++ b/tests/tex/command-expansion.el
@@ -88,7 +88,7 @@
   "Check whether \"\\input\" and \"\\detokenize\" are supplied when necessary."
   ;; Skip on w32 because the quoting style of `shell-quote-argument'
   ;; is different.
-  (skip-unless (not (eq system-type 'w32)))
+  (skip-unless (not (eq system-type 'windows-nt)))
   (should (string=
            (let ((major-mode 'latex-mode)
                 (TeX-engine 'default)
@@ -102,6 +102,9 @@
 File names obtained as expansion of \"%t\", \"%s\" and so on should be
 skipped for the following expansion to avoid possible endless loop.
 See <https://lists.gnu.org/r/bug-auctex/2014-08/msg00012.html>."
+  ;; Skip on w32 because the quoting style of `shell-quote-argument'
+  ;; is different.
+  (skip-unless (not (eq system-type 'windows-nt)))
   (let ((TeX-master "abc-def")
        (TeX-expand-list '(("-" (lambda () ":")))))
     (should (string=
@@ -128,6 +131,9 @@ See 
<https://lists.gnu.org/r/bug-auctex/2014-08/msg00012.html>."
 
 (ert-deftest TeX-command-expand-active-master ()
   "Test whether `TeX-active-master' is valid argument for 
`TeX-command-expand'."
+  ;; Skip on w32 because the quoting style of `shell-quote-argument'
+  ;; is different.
+  (skip-unless (not (eq system-type 'windows-nt)))
   (let ((TeX-master "abc")
        TeX-current-process-region-p)
     (setq TeX-current-process-region-p nil)

-----------------------------------------------------------------------

Summary of changes:
 tests/tex/command-expansion.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)


hooks/post-receive
-- 
GNU AUCTeX