diff --git a/scheme/packages.scm b/scheme/packages.scm
index 061a0b9..fc5738b 100644
--- a/scheme/packages.scm
+++ b/scheme/packages.scm
@@ -141,14 +141,14 @@
           net-daytime))
 
 (define-interface dns-interface
-  (export dns-clear-cache		; clears the cache
+  (export dns-clear-cache!		; clears the cache
 	  dns-lookup			; complex lookup function
 	  dns-lookup-name		; simple lookup function
 	  dns-inverse-lookup		; obsolete, use dns-lookup-ip
 	  dns-lookup-ip			; simple lookup function
 	  dns-lookup-nameserver		; simple lookup function
 	  dns-lookup-mail-exchanger	; simple lookpu function
-	  show-dns-message		; prints a human readable dns-msg
+	  pretty-print-dns-message	; prints a human readable dns-msg
 	  force-ip			; reruns a lookup until a ip is resolved
 	  force-ip-list			; reruns a lookup until a list of ips is resolved
 	  address32->ip-string		; converts a address32 in an ip-string