--- /tmp/structures.c  2015-12-20 15:05:25.300907000 +0700
+++ /tmp/tgl/structures.c  2016-01-05 17:44:03.568076059 +0700
@@ -602,6 +602,8 @@

   tgl_document_insert (TLS, D);

+  D->flags = TGLDF_VIDEO;
+
   D->access_hash = DS_LVAL (DS_V->access_hash);
   D->user_id = DS_LVAL (DS_V->user_id);
   D->date = DS_LVAL (DS_V->date);
@@ -954,12 +956,12 @@
     break;
   case CODE_message_media_video:
   case CODE_message_media_video_l27:
-    M->type = tgl_message_media_document;
+    M->type = tgl_message_media_video;
     M->document = tglf_fetch_alloc_video_new (TLS, DS_MM->video);
     M->caption = DS_STR_DUP (DS_MM->caption);
     break;
   case CODE_message_media_audio:
-    M->type = tgl_message_media_document;
+    M->type = tgl_message_media_audio;
     M->document = tglf_fetch_alloc_audio_new (TLS, DS_MM->audio);
     break;
   case CODE_message_media_document:
@@ -993,6 +995,9 @@
     M->venue.provider = DS_STR_DUP (DS_MM->provider);
     M->venue.venue_id = DS_STR_DUP (DS_MM->venue_id);
     break;
+  case CODE_message_media_unsupported:
+    M->type = tgl_message_media_unsupported;
+    break;
   default:
     assert (0);
   }
@@ -1761,6 +1766,8 @@
     tfree_str (M->last_name);
     return;
   case tgl_message_media_document:
+  case tgl_message_media_video:
+  case tgl_message_media_audio:
     tgls_free_document (TLS, M->document);
     return;
   case tgl_message_media_unsupported: