# HG changeset patch
# User Jaroslav Hajek <highegg@gmail.com>
# Date 1241596526 -7200
# Node ID 9861b3ec72a6ccef96da1c7e65a57b6298766c5a
# Parent  94ae487acd1bf65402d005f3a7b30127feeb0214
fix bug in double

diff --git a/src/ChangeLog b/src/ChangeLog
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2009-05-06  Jaroslav Hajek  <highegg@gmail.com>
+
+	* ov-re-mat.cc (Fdouble): Fix order of branches.
+
 2009-05-05  John Swensen  <jpswensen@comcast.net>
 
 	* debug.h, debug.cc (breakpoints): Rename from bp_map, use a
diff --git a/src/ov-re-mat.cc b/src/ov-re-mat.cc
--- a/src/ov-re-mat.cc
+++ b/src/ov-re-mat.cc
@@ -850,13 +850,13 @@
   // inside their own scopes, and we don't declare retval here to
   // avoid a shadowed declaration warning.
 
-  if (args(0).is_perm_matrix ())
+  if (args.length () == 1)
     {
-      OCTAVE_TYPE_CONV_BODY3 (double, octave_perm_matrix, octave_scalar);
-    }
-  else if (args.length () == 1)
-    {
-      if (args(0).is_diag_matrix ())
+      if (args(0).is_perm_matrix ())
+        {
+          OCTAVE_TYPE_CONV_BODY3 (double, octave_perm_matrix, octave_scalar);
+        }
+      else if (args(0).is_diag_matrix ())
         {
 	  if (args(0).is_complex_type ())
 	    {