fix scan_to_sa (Tim Lorenz)

CHANGES

@@ -1,4 +1,5 @@
 0.24:
+  fix scan_to_sa (Tim Lorenz)
 
 0.23:
   also recognize EPFNOSUPPORT as EAFNOSUPPORT (groan)

textcode/scan_to_sa.c

@@ -4,10 +4,10 @@
 
 unsigned long scan_to_sa(unsigned long (*func)(const char*,char*,unsigned long*),
 			 const char* src,stralloc* sa) {
-  unsigned long scanned;
+  unsigned long written;
   unsigned long r;
   if (!stralloc_readyplus(sa,str_len(src))) return 0;
-  if ((r=func(src,sa->s+sa->len,&scanned)))
+  if ((r=func(src,sa->s+sa->len,&written)))
-    sa->len+=r;
+    sa->len+=written;
   return r;
 }