--- a/liboctave/dSparse.cc	Mon Nov 23 08:43:42 2009 +0100
+++ b/liboctave/dSparse.cc	Mon Nov 23 10:00:29 2009 +0100
@@ -7348,6 +7348,21 @@
 }
 
 bool
+SparseMatrix::any_element_not_one_or_zero (void) const
+{
+  octave_idx_type nel = nnz ();
+
+  for (octave_idx_type i = 0; i < nel; i++)
+    {
+      double val = data (i);
+      if (val != 0.0 && val != 1.0)
+	return true;
+    }
+
+  return false;
+}
+
+bool
 SparseMatrix::all_elements_are_zero (void) const
 {
   octave_idx_type nel = nnz ();