From: Matthew Fernandez <matthew.fernandez@gmail.com>
Date: Sat, 2 Jan 2021 23:59:19 +0000 (-0800)
Subject: test case for #1780
X-Git-Tag: 2.47.0~32^2~1
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=426dde90651b15af6b85360614a4395b30ef371e;p=graphviz

test case for #1780
---

diff --git a/rtest/test_regression.py b/rtest/test_regression.py
index 9f5c8f6cb..da6111d91 100644
--- a/rtest/test_regression.py
+++ b/rtest/test_regression.py
@@ -363,6 +363,22 @@ def test_1767():
       #                  'cluster_2 contains 3 nodes\n' \
       #                  'cluster_3 contains 3 nodes\n'
 
+@pytest.mark.xfail(strict=True) # FIXME
+@pytest.mark.skipif(shutil.which('gvpr') is None, reason='GVPR not available')
+@pytest.mark.skipif(platform.system() != 'Windows',
+  reason='only relevant on Windows')
+def test_1780():
+    '''
+    GVPR should accept programs at absolute paths
+    https://gitlab.com/graphviz/graphviz/-/issues/1780
+    '''
+
+    # get absolute path to an arbitrary GVPR program
+    clustg = Path(__file__).resolve().parent.parent / 'cmd/gvpr/lib/clustg'
+
+    # GVPR should not fail when given this path
+    subprocess.check_call(['gvpr', '-f', clustg], stdin=subprocess.DEVNULL)
+
 def test_1783():
     '''
     Graphviz should not segfault when passed large edge weights