Fix regression: checking abort when prompting for command name.

bind.c

@@ -106,15 +106,19 @@ int deskey( int f, int n) {
  *
  * int f, n;        command arguments [IGNORED]
  */
-int bindtokey(int f, int n) {
+int bindtokey( int f, int n) {
     key_tab *ktp ;		/* pointer into the command table */
     char outseq[ 80] ;  /* output buffer for keystroke sequence */
 
 /* prompt the user to type in a key to bind */
     mlwrite(": bind-to-key ");
 
 /* get the function name to bind it to */
-    fnp_t kfunc = getname()->n_func ;
+	const name_bind *nbp = getname() ;
+	if( nbp == NULL)	/* abort */
+		return FALSE ;
+
+    fnp_t kfunc = nbp->n_func ;
     if( kfunc == NULL) {
         mlwrite( "(No such function)") ;
         return FALSE ;

exec.c

@@ -87,10 +87,13 @@ static int macarg( char *tok, int toksz) ;
  */
 int namedcmd( int f, int n) {
     /* prompt the user to type a named command */
-    mlwrite(": ");
+    mlwrite(": execute-named-cmd ");
 
     /* and now get the function name to execute */
 	const name_bind *nbp = getname() ;
+	if( nbp == NULL)	/* abort */
+		return FALSE ;
+
     fnp_t kfunc = nbp->n_func ;
     if (kfunc == NULL) {
         mlwrite("(No such function)");
@@ -118,7 +121,7 @@ int execcmd( int f, int n) {
     char *cmdstr ;	/* string holding command to execute */
 
     /* get the line wanted */
-    status = newmlarg( &cmdstr, ": ", 0) ;
+    status = newmlarg( &cmdstr, ": execute-command-line ", 0) ;
     if( status != TRUE)
         return status ;