Index: openacs-4/packages/bookshelf/tcl/amazon-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bookshelf/tcl/amazon-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/bookshelf/tcl/amazon-procs.tcl	21 Jan 2003 14:54:26 -0000	1.2
+++ openacs-4/packages/bookshelf/tcl/amazon-procs.tcl	26 Mar 2003 17:59:17 -0000	1.3
@@ -48,6 +48,7 @@
         close $writefd
         
         set tmpfilefd [open $filename w]
+        fconfigure $tmpfilefd -translation binary 
         
         fcopy $readfd $tmpfilefd
         
Index: openacs-4/packages/bookshelf/www/book-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bookshelf/www/book-edit.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/bookshelf/www/book-edit.tcl	30 Sep 2002 18:10:56 -0000	1.1
+++ openacs-4/packages/bookshelf/www/book-edit.tcl	26 Mar 2003 17:59:51 -0000	1.2
@@ -78,10 +78,13 @@
 
     ad_returnredirect "."
     return
+} -on_submit {
+    set isbn [string trim $isbn]
 }
 
 
 form get_values book isbn __isbn_update_flag
+set isbn [string trim $isbn]
 if { $__isbn_update_flag && [exists_and_not_null isbn] } {
     set image_url [bookshelf::amazon::get_image_url $isbn]
     set book_url [bookshelf::amazon::get_book_url $isbn]