diff --git a/appl/xnlock/xnlock.c b/appl/xnlock/xnlock.c
index c4bc50ad2..608275147 100644
--- a/appl/xnlock/xnlock.c
+++ b/appl/xnlock/xnlock.c
@@ -219,7 +219,8 @@ init_words (int argc, char **argv)
     int i = 0;
 
     while(argv[i]) {
-	if(strcmp(argv[i], "-p") == 0) {
+	if(strcmp(argv[i], "-p") == 0
+	   || strcmp(argv[i], "-prog") == 0) {
 	    i++;
 	    if(argv[i]) {
 		appres.text_prog = argv[i];