BUG: Minor logic fix.

ntustison · ntustison · commit 185de4677b4f · 2024-12-04T09:52:53.000-08:00
diff --git a/R/labelImageRegistration.R b/R/labelImageRegistration.R
@@ -280,7 +280,8 @@ labelImageRegistration <- function( fixedLabelImages, movingLabelImages,
         if( ! ( grepl( "bo", subtypeOfDeformableTransform ) || grepl( "so", subtypeOfDeformableTransform ) ) )
           {
           stop( "Only 'so' or 'bo' transforms are available." ) 
-          } else {
+          }
+        else if( grepl( "bo", subtypeOfDeformableTransform ) ) {
           synTransform <- "BSplineSyN" 
           }
         if( grepl( ",", subtypeOfDeformableTransform ) ) 

Original file line number	Diff line number	Diff line change
`@@ -280,7 +280,8 @@ labelImageRegistration <- function( fixedLabelImages, movingLabelImages,`
`280`	`280`	`if( ! ( grepl( "bo", subtypeOfDeformableTransform ) \|\| grepl( "so", subtypeOfDeformableTransform ) ) )`
`281`	`281`	`{`
`282`	`282`	`stop( "Only 'so' or 'bo' transforms are available." )`
`283`		`- } else {`
	`283`	`+ }`
	`284`	`+ else if( grepl( "bo", subtypeOfDeformableTransform ) ) {`
`284`	`285`	`synTransform <- "BSplineSyN"`
`285`	`286`	`}`
`286`	`287`	`if( grepl( ",", subtypeOfDeformableTransform ) )`