From 09cbce533a2ed4580084a705cab8b625a647c46d Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@users.sourceforge.net>
Date: Sat, 25 Dec 2010 19:50:51 +0100
Subject: [PATCH] The stream-external-format of a broadcast stream is always
 :default.

---
 src/c/file.d | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/src/c/file.d b/src/c/file.d
index 67ff6a4aa..5bd07b92f 100755
--- a/src/c/file.d
+++ b/src/c/file.d
@@ -2011,11 +2011,7 @@ const struct ecl_file_ops broadcast_ops = {
 		streams = CONS(x, streams);
 	}
 	x = alloc_stream();
-	if (Null(streams)) {
-		x->stream.format = @':pass-through';
-	} else {
-		x->stream.format = cl_stream_external_format(ECL_CONS_CAR(streams));
-	}
+	x->stream.format = @':default';
 	x->stream.ops = duplicate_dispatch_table(&broadcast_ops);
 	x->stream.mode = (short)smm_broadcast;
 	BROADCAST_STREAM_LIST(x) = cl_nreverse(streams);