SCCS-vsn: old/dbx/eval.c 5.2
-static char sccsid[] = "@(#)eval.c 5.1 (Berkeley) %G%";
+static char sccsid[] = "@(#)eval.c 5.2 (Berkeley) %G%";
#endif not lint
static char rcsid[] = "$Header: eval.c,v 1.5 84/12/26 10:39:08 linton Exp $";
#endif not lint
static char rcsid[] = "$Header: eval.c,v 1.5 84/12/26 10:39:08 linton Exp $";
* Send a message to the current support person.
*/
* Send a message to the current support person.
*/
+ifdef MAINTAINER
+static char maintainer[] = MAINTAINER;
+#else
+static char maintainer[] = "";
+#endif
+
public gripe()
{
typedef Operation();
public gripe()
{
typedef Operation();
extern int versionNumber;
char subject[100];
extern int versionNumber;
char subject[100];
+ if (maintainer[0] == '\0') {
+ puts("Gripes not supported at this site. Sorry.");
+ return;
+ }
puts("Type control-D to end your message. Be sure to include");
puts("your name and the name of the file you are debugging.");
putchar('\n');
old = signal(SIGINT, SIG_DFL);
sprintf(subject, "dbx (version 3.%d) gripe", versionNumber);
puts("Type control-D to end your message. Be sure to include");
puts("your name and the name of the file you are debugging.");
putchar('\n');
old = signal(SIGINT, SIG_DFL);
sprintf(subject, "dbx (version 3.%d) gripe", versionNumber);
- pid = back("Mail", stdin, stdout, "-s", subject, MAINTAINER, nil);
+ pid = back("Mail", stdin, stdout, "-s", subject, maintainer, nil);
signal(SIGINT, SIG_IGN);
pwait(pid, &status);
signal(SIGINT, old);
signal(SIGINT, SIG_IGN);
pwait(pid, &status);
signal(SIGINT, old);