diff --git a/doc/Changelog b/doc/Changelog
index f78cec0b3..7cff8c968 100644
--- a/doc/Changelog
+++ b/doc/Changelog
@@ -1,6 +1,7 @@
 7 February 2011: Wouter
 	- Added regression test for addition of a .net DS to the root, and
 	  cache effects with different TTL for glue and DNSKEY.
+	- iana portlist updated.
 
 28 January 2011: Wouter
 	- Fix remove private address does not throw away entire response.
diff --git a/util/iana_ports.inc b/util/iana_ports.inc
index 316c5e77e..7ecc63a67 100644
--- a/util/iana_ports.inc
+++ b/util/iana_ports.inc
@@ -5026,6 +5026,7 @@
 13218,
 13223,
 13224,
+13401,
 13720,
 13721,
 13722,