--- a/newgrf.c	Thu Jun 02 21:38:50 2005 +0000
+++ b/newgrf.c	Fri Jun 03 10:39:30 2005 +0000
@@ -343,7 +343,12 @@
 				_engine_refit_masks[engine + i] = refit_mask;
 			}
 		}	break;
-
+		case 0x1E:	/* Callback */
+			FOR_EACH_OBJECT {
+				byte callbacks = grf_load_byte(&buf);
+				rvi[i].callbackmask = callbacks;
+			}
+			break;
 		/* TODO */
 		/* Fall-through for unimplemented two bytes long properties. */
 		case 0x1B:	/* Powered wagons power bonus */
@@ -353,7 +358,6 @@
 		/* Fall-through for unimplemented one byte long properties. */
 		case 0x1A:	/* Sort order */
 		case 0x1C:	/* Refit cost */
-		case 0x1E:	/* Callback */
 		case 0x1F:	/* Tractive effort */
 		case 0x20:	/* Air drag */
 		case 0x21:	/* Shorter tenders */