Correct a typo, and a test for the affected verb.

diff --git a/actions.c b/actions.c
index 42541bfa6a6d732faeb0655622d17c152bbe5642..aa6e6dac4ad6a1c482fba14fccf9ce07d61ddb6f 100644 (file)
--- a/actions.c
+++ b/actions.c
@@ -1053,12 +1053,12 @@ int action(FILE *input, enum speechpart part, long verb, token_t obj)
            if (verb == SAY)obj=WD2;
            if (obj == 0) {
                /*  Analyse an intransitive verb (ie, no object given yet). */
-               switch (verb-1) {
+                   switch (verb-1) {
                    case  0: /* CARRY */ return carry(verb, INTRANSITIVE);
                    case  1: /* DROP  */ return(8000); 
                    case  2: /* SAY   */ return(8000); 
                    case  3: /* UNLOC */ return lock(verb, INTRANSITIVE);    
-                   case  4: /* NOTHI */ {RSPEAK(54); return(20012);}
+                   case  4: /* NOTHI */ {RSPEAK(54); return(GO_CLEAROBJ);}
                    case  5: /* LOCK  */ return lock(verb, INTRANSITIVE);    
                    case  6: /* LIGHT */ return light(verb, INTRANSITIVE);    
                    case  7: /* EXTIN */ return extinguish(verb, INTRANSITIVE);    

diff --git a/tests/urntest.log b/tests/urntest.log
index f394188a75fc17b20548f60680ba0f3891de3cfd..e0d4682ad65106f280e8a2033fed2ee334fbb5fd 100644 (file)
--- a/tests/urntest.log
+++ b/tests/urntest.log
@@ -1,4 +1,4 @@
-# Test verbs on urn
+## Test verbs on urn
 n
 seed 1838473132
 in

diff --git a/tests/woodshint.chk b/tests/woodshint.chk
index b211862346ed83b8a28d2a926b39548bef3b998e..d90bfb514ff7a1ea165a7a5f82ffbc4dfd881363 100644 (file)
--- a/tests/woodshint.chk
+++ b/tests/woodshint.chk
@@ -129,6 +129,10 @@ Drop what?
 
 Okay, "SAY".
 
+> nothing
+
+OK
+
 > wave
 
 Wave what?
@@ -169,9 +173,11 @@ Wake what?
 
 You are wandering aimlessly through the forest.
 
+Would you like to be shown out of the forest?
+
 > e
 
-You are wandering aimlessly through the forest.
+Please answer the question.
 
 Would you like to be shown out of the forest?
 

diff --git a/tests/woodshint.log b/tests/woodshint.log
index 11b1d13d2f05d846af3fea36e7137a19da7fb18b..7efaa33e376a41ccb8e88b82dcf2680f0a7351ab 100644 (file)
--- a/tests/woodshint.log
+++ b/tests/woodshint.log
@@ -28,6 +28,7 @@ e
 e
 drop
 say
+nothing
 wave
 calm
 walk