diff --git a/doc/Changelog b/doc/Changelog
index 6e7fa9343..ed11fc7a6 100644
--- a/doc/Changelog
+++ b/doc/Changelog
@@ -1,3 +1,7 @@
+4 August 2008: Wouter
+	- iana port update. 
+	- TODO update.
+
 30 July 2008: Wouter
 	- fixup bug qtype DS for unsigned zone and signed parent validation.
 
diff --git a/util/iana_ports.inc b/util/iana_ports.inc
index 3c41790f8..f334deb7b 100644
--- a/util/iana_ports.inc
+++ b/util/iana_ports.inc
@@ -4101,6 +4101,7 @@
 5316,
 5343,
 5344,
+5349,
 5350,
 5351,
 5352,
@@ -4389,6 +4390,7 @@
 6628,
 6669,
 6670,
+6671,
 6672,
 6673,
 6701,
@@ -4775,6 +4777,7 @@
 9397,
 9400,
 9401,
+9402,
 9418,
 9443,
 9500,