diff --git a/books/bookvol10.4.pamphlet b/books/bookvol10.4.pamphlet
index d2c2088..84ca01a 100644
--- a/books/bookvol10.4.pamphlet
+++ b/books/bookvol10.4.pamphlet
@@ -126317,7 +126317,7 @@ PolynomialToUnivariatePolynomial(x:Symbol, R:Ring): with
  == add
   univariate(p, y) ==
     q:SparseUnivariatePolynomial(Polynomial R) := univariate(p, x)
-    map(#1, q)$UnivariatePolynomialCategoryFunctions2(Polynomial R,
+    map(x1+->x1, q)$UnivariatePolynomialCategoryFunctions2(Polynomial R,
                   SparseUnivariatePolynomial Polynomial R, Polynomial R,
                       UnivariatePolynomial(x, Polynomial R))
 
diff --git a/changelog b/changelog
index 1ad264b..f52e73c 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,5 @@
+20090613 tpd src/axiom-website/patches.html 20090613.03.tpd.patch
+20090613 tpd books/bookvol10.4 POLY2UP +-> conversion
 20090613 tpd src/axiom-website/patches.html 20090613.02.tpd.patch
 20090613 tpd books/bookvol10.4 SOLVEFOR +-> conversion
 20090613 tpd src/axiom-website/patches.html 20090613.01.tpd.patch
diff --git a/src/axiom-website/patches.html b/src/axiom-website/patches.html
index 080dc06..e32c2d0 100644
--- a/src/axiom-website/patches.html
+++ b/src/axiom-website/patches.html
@@ -1563,5 +1563,7 @@ bookvol10.4 POLY2 +-> conversion<br/>
 bookvol10.4 PGCD +-> conversion<br/>
 <a href="patches/20090613.02.tpd.patch">20090613.02.tpd.patch</a>
 bookvol10.4 SOLVEFOR +-> conversion<br/>
+<a href="patches/20090613.03.tpd.patch">20090613.03.tpd.patch</a>
+bookvol10.4 POLY2UP +-> conversion<br/>
  </body>
 </html>
