diff --git a/src/pager.c b/src/pager.c
index 1d794754d..9d1f6b8a2 100644
--- a/src/pager.c
+++ b/src/pager.c
@@ -642,6 +642,10 @@ do_look(quick)
 		} else {
 			found += append_str(out_str, def_warnsyms[i].explanation);
 		}
+		/* Kludge: warning trumps boulders on the display.
+		   Reveal the boulder too or player can get confused */
+		if (sobj_at(BOULDER, cc.x, cc.y))
+			Strcat(out_str, " co-located with a boulder");
 		break;	/* out of for loop*/
 	    }
 	}