commit - e48a50b72a91593332fdead56a21cd46e6ac74a8
commit + d13551333c4eb74f1010030b23e3405843ae1c11
blob - 33a2cdbf89c83c0d7ffda564b38bdddd601d8f8d
blob + b26ca47e19d1c748979873b6b08f48279258afeb
--- script.c
+++ script.c
@@ -619,6 +619,13 @@ val_faccess(struct value *a, const char *field, struct
 		} else
 			return EVAL_ERR;
 		break;
+	case V_MSG:
+		if (!strcmp(field, "type")) {
+			ret->type = V_U8;
+			ret->v.u8 = *(a->v.msg.msg + 4); /* skip the length */
+		} else
+			return EVAL_ERR;
+		break;
 	default:
 		return EVAL_ERR;
 	}