--- rcscmds.c	Mon Dec 13 15:57:07 1999
+++ /tmp/rcscmds.c	Mon Apr 17 10:11:37 2000
@@ -251,6 +251,11 @@
      if (options != NULL && options[0] != '\0')
        assert (options[0] == '-' && options[1] == 'k');

+    if (options == NULL || options[0] == '\0') {
+      cvs_output("Disabling keyword expansion for join\n",0);
+      options = "-kk";
+    }
+
      cvs_output ("RCS file: ", 0);
      cvs_output (rcs->path, 0);
      cvs_output ("\n", 1);
