From b3f953c6b48b3ecb252449df4cf0026db510e515 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Wed, 24 Jun 2015 18:45:51 -0700
Subject: [PATCH] graphviz.render: Find the graphviz binary using
 find-in-standard-login-path.

---
 extra/graphviz/render/render.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/graphviz/render/render.factor b/extra/graphviz/render/render.factor
index 5b5c188d9b..88a39dd254 100644
--- a/extra/graphviz/render/render.factor
+++ b/extra/graphviz/render/render.factor
@@ -45,7 +45,7 @@ M: unsupported-encoding summary
 HOOK: default-graphviz-program os ( -- path/f )
 
 M: object default-graphviz-program ( -- path/f )
-    standard-layouts [ find-in-path ] find nip ;
+    standard-layouts [ find-in-standard-login-path ] map-find drop ;
 
 ERROR: cannot-find-graphviz-installation ;