# HG changeset patch
# User Jamie Bullock <jamie@jamiebullock.com>
# Date 1401996608 -3600
# Node ID 66ebf1399a29c87292af1fd4b60f09cd359c6d71
# Parent  a1c83801f9736fcdaad31b5ba34ddebabf9634af
Fix bug in xtract_peak()

diff -r a1c83801f973 -r 66ebf1399a29 src/scalar.c
--- a/src/scalar.c	Thu Jun 05 20:29:46 2014 +0100
+++ b/src/scalar.c	Thu Jun 05 20:30:08 2014 +0100
@@ -1037,7 +1037,7 @@
     }
     
     average /= (double)N;
-    
+        
     if (current != maximum)
     {
         return XTRACT_NO_RESULT;
@@ -1048,6 +1048,8 @@
         return XTRACT_NO_RESULT;
     }
     
+    *result = current;
+    
     return XTRACT_SUCCESS;
     
 }