diff --git a/RAutoClDs.R b/RAutoClDs.R
index 6d20426..d954a30 100644
--- a/RAutoClDs.R
+++ b/RAutoClDs.R
@@ -244,8 +244,7 @@ THEFT <- function(){
 			geneIDNam <-  paste0("Clean_GPL",gplnum,".txt") %>%
 				read_delim(delim="\t",col_names = c("ID","Symbol"), comment = "!")
 			
-			} 
-			else if(clfileex == 0){
+			} else if(clfileex == 0){
 			##Lets Create a clean version
 			 
 			##Gene ID to Gene Name