[AUCTeX-diffs] GNU AUCTeX branch, master, updated. 20b6fd0d1cb46a9069ece92ebbc2ca05910f04d5

[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  20b6fd0d1cb46a9069ece92ebbc2ca05910f04d5 (commit)
      from  9e5e5f6a29071b44ebe60adcb48f605b469f78fd (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 20b6fd0d1cb46a9069ece92ebbc2ca05910f04d5
Author: Ikumi Keita <address@hidden>
Date:   Fri Sep 22 05:35:57 2017 +0900

    Add test abount truncation of list
    
    * tests/tex/path-expansion.el: New file to test whether
    `TeX-search-files-by-type' does not truncate the value of list
    variable.

diff --git a/tests/tex/path-expansion.el b/tests/tex/path-expansion.el
new file mode 100644
index 0000000..4b9b5c0
--- /dev/null
+++ b/tests/tex/path-expansion.el
@@ -0,0 +1,36 @@
+;;; path-expansion.el --- tests for path expansion
+
+;; Copyright (C) 2017 Free Software Foundation, Inc.
+
+;; This file is part of AUCTeX.
+
+;; AUCTeX is free software; you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; AUCTeX is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with AUCTeX; see the file COPYING.  If not, write to the Free
+;; Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Code:
+
+(require 'ert)
+(require 'tex)
+
+(ert-deftest TeX-variable-truncation ()
+  "Check whether list variable is not truncated as side effect."
+  (let ((var '("str1" "str2"))
+       (TeX-kpathsea-path-delimiter nil)
+       (TeX-search-files-type-alist
+        '((abc "${dummy}" ("str2" var) TeX-file-extensions))))
+    (TeX-search-files-by-type 'abc 'global)
+    (should (equal var '("str1" "str2")))))
+
+;;; command-expansion.el ends here

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

Summary of changes:
 tests/tex/{utility.el => path-expansion.el} | 16 ++++++++++------
 1 file changed, 10 insertions(+), 6 deletions(-)
 copy tests/tex/{utility.el => path-expansion.el} (65%)


hooks/post-receive
-- 
GNU AUCTeX