diff --git a/pd/src/t_main.c b/pd/src/t_main.c
index 6ed972303086b0fa927b0f0bcdaa077a009313a3..d383366742f42350b772e28f594f9362ec17050a 100644
--- a/pd/src/t_main.c
+++ b/pd/src/t_main.c
@@ -60,6 +60,8 @@ main(int argc, char **argv)
     {
         //specify root window name
         argc--; argv++;
+    } else if (argc == 1) { //if we are running directly from pd-gui with no args
+        argv[0]="pd-l2ork";
     }
     Tk_Main(argc, argv, Tcl_AppInit);
     return 0;                   /* Needed only to prevent compiler warning. */