fix problem with "nop" layouts

diff --git a/tclpkg/tcldot/tcldot.c b/tclpkg/tcldot/tcldot.c
index 87cc8b82e2c6b22462ebe90833285485d09228f2..bf5c8d6bd8800f1f9a1f3532814ea3221ce8f777 100644 (file)
--- a/tclpkg/tcldot/tcldot.c
+++ b/tclpkg/tcldot/tcldot.c
@@ -564,7 +564,14 @@ static void tcldot_layout(GVC_t *gvc, Agraph_t * g, char *engine)
            rc = gvlayout_select(gvc, "neato");
     }
     else {
-       rc = gvlayout_select(gvc, engine);
+       if (strcasecmp(engine, "nop") == 0) {
+           Nop = 2;
+           PSinputscale = POINTS_PER_INCH;
+           rc = gvlayout_select(gvc, "neato");
+       }
+       else {
+           rc = gvlayout_select(gvc, engine);
+       }
        if (rc == NO_SUPPORT)
            rc = gvlayout_select(gvc, "dot");
     }