diff --git a/binary-types.asd b/binary-types.asd
index e0782e6..c01c743 100644
--- a/binary-types.asd
+++ b/binary-types.asd
@@ -6,7 +6,7 @@
 (defsystem "binary-types"
   :description "A library for reading and writing binary records."
   :long-description #.(uiop:read-file-string
-		       (uiop:subpathname *load-pathname* "description.text"))
+		       (uiop:subpathname *load-pathname* "description.txt"))
   :version "1.0.1"
   :author "Frode V. Fjeld"
   :maintainer "Steven Nunez"
diff --git a/description.txt b/description.txt
new file mode 100644
index 0000000..a5f820c
--- /dev/null
+++ b/description.txt
@@ -0,0 +1,7 @@
+Read and write binary data to streams.  This is useful when
+interfacing to external systems, like C, or in reading binary file
+formats, such as data files or music.  Using a declarative syntax you
+can define the structure of the binary file, and then load it with all
+the definitions populated.  There is also a stream based interface for
+reading/writing individual elements.
+
diff --git a/pkgdcl.lisp b/pkgdcl.lisp
index 83a3863..5744d09 100644
--- a/pkgdcl.lisp
+++ b/pkgdcl.lisp
@@ -65,4 +65,5 @@
 	   #:*padding-byte*		; [dynamic-var] The value filled in when writing paddings
 	   #:split-bytes		; [func] utility
 	   #:merge-bytes)		; [func] utility
-  (:documentation "Read and write binary data to streams.  This is useful when interfacing to external systems, like C, or in reading binary file formats, such as data files or music.  Using a declarative syntax you can define the structure of the binary file, and then load it with all the definitions populated.  There is also a stream based interface for reading/writing individual elements."))
+  (:documentation #.(uiop:read-file-string
+		       (uiop:subpathname *load-pathname* "description.txt"))))