diff --git a/books/bookvol9.pamphlet b/books/bookvol9.pamphlet
index f4a7555..3865d62 100644
--- a/books/bookvol9.pamphlet
+++ b/books/bookvol9.pamphlet
@@ -26814,6 +26814,7 @@ The current input line.
 \getchunk{defun spadCompileOrSetq}
 \getchunk{defun spad-fixed-arg}
 \getchunk{defun spadSysBranch}
+\getchunk{defun spadSysChoose}
 \getchunk{defun splitEncodedFunctionName}
 \getchunk{defun stack-clear}
 \getchunk{defun stack-load}
diff --git a/changelog b/changelog
index 812e822..5cd67de 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,5 @@
+20141229 tpd src/axiom-website/patches.html 20141229.01.tpd.patch
+20141229 tpd books/bookvol9 add spadSysChoose
 20141228 tpd src/axiom-website/patches.html 20141228.05.tpd.patch
 20141228 tpd src/axiom-website/videos.html add videos
 20141228 tpd src/axiom-website/patches.html 20141228.04.tpd.patch
diff --git a/patch b/patch
index 8b6ffa7..d25b9c3 100644
--- a/patch
+++ b/patch
@@ -1,6 +1,3 @@
-src/axiom-website/videos.html add videos
-
-Add Bug Report Tracking, Debugging Axiom Lisp Failure,
-and Closing a Reported Bug videos
-
+books/bookvol9 add spadSysChoose
 
+Add a missing getchunk for spadSysChoose
diff --git a/src/axiom-website/patches.html b/src/axiom-website/patches.html
index c5c8479..b9a76ab 100644
--- a/src/axiom-website/patches.html
+++ b/src/axiom-website/patches.html
@@ -4862,6 +4862,8 @@ buglist: bug 7274: Hyperdoc failed <br/>
 buglist: bug 7274 was fixed by 20141228.04.tpd.patch<br/>
 <a href="patches/20141228.05.tpd.patch">20141228.05.tpd.patch</a>
 src/axiom-website/videos.html add videos<br/>
+<a href="patches/20141229.01.tpd.patch">20141229.01.tpd.patch</a>
+books/bookvol9 add spadSysChoose<br/>
  </body>
 </html>