# HG changeset patch
# User Jaroslav Hajek <highegg@gmail.com>
# Date 1273746326 -7200
# Node ID b7c4954e1c00192c6bf7e5f0dff2aef781d76351
# Parent  d406d91aa9c30eae5de21c29f719f411f47720a5
add specific ID for sqrtm singularity warning

diff -r d406d91aa9c3 -r b7c4954e1c00 src/ChangeLog
--- a/src/ChangeLog	Thu May 13 11:46:47 2010 +0200
+++ b/src/ChangeLog	Thu May 13 12:25:26 2010 +0200
@@ -1,3 +1,8 @@
+2010-05-13  Jaroslav Hajek  <highegg@gmail.com>
+
+	* DLD-FUNCTIONS/sqrtm.cc (sqrtm_utri_inplace): Use an ID for the
+	warning.
+
 2010-05-13  Jaroslav Hajek  <highegg@gmail.com>
 
 	* load-save.cc (install_loaded_variable): Pre-extract symbol record
diff -r d406d91aa9c3 -r b7c4954e1c00 src/DLD-FUNCTIONS/sqrtm.cc
--- a/src/DLD-FUNCTIONS/sqrtm.cc	Thu May 13 11:46:47 2010 +0200
+++ b/src/DLD-FUNCTIONS/sqrtm.cc	Thu May 13 12:25:26 2010 +0200
@@ -86,7 +86,8 @@
     }
 
   if (singular)
-    warning ("sqrtm: matrix is singular, may not have a square root");
+    warning_with_id ("Octave:sqrtm:SingularMatrix",
+                     "sqrtm: matrix is singular, may not have a square root");
 }
 
 template <class Matrix, class ComplexMatrix, class ComplexSCHUR>