--- a/JPEGReader.st	Mon Dec 12 21:25:19 2011 +0100
+++ b/JPEGReader.st	Mon Dec 12 21:34:59 2011 +0100
@@ -602,7 +602,7 @@
     "/ to extract app1 data (for example, exif geolocation tags),
     "/ uncomment the following and implement the exif tag reader...
     "/ Warning: this does not yet work as expected.
-    "/ app1SegmentHandler := [:data | self halt. self extractApp1DataFrom:data].
+    "/ app1SegmentHandler := [:data | self extractApp1DataFrom:data].
 
     (self create_jpeg_decompress_struct not
     or:[self start_decompress not]) ifTrue:[
@@ -671,17 +671,17 @@
      ^ reader image
     "
 
-    "Modified (comment): / 12-12-2011 / 21:25:09 / cg"
+    "Modified: / 12-12-2011 / 21:34:48 / cg"
 ! !
 
 !JPEGReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/JPEGReader.st,v 1.53 2011-12-12 20:25:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/JPEGReader.st,v 1.54 2011-12-12 20:34:59 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/JPEGReader.st,v 1.53 2011-12-12 20:25:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/JPEGReader.st,v 1.54 2011-12-12 20:34:59 cg Exp $'
 ! !
 
 JPEGReader initialize!