From f2e35b78c40243009839245bc865d086b063a215 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jos=C3=A9=20de=20Jesus=20Filho?= <jjesusfilho@gmail.com>
Date: Sat, 11 May 2019 02:25:24 +0000
Subject: [PATCH] fix if else

---
 R/snippets.R | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/R/snippets.R b/R/snippets.R
index ac57c21..5e32024 100644
--- a/R/snippets.R
+++ b/R/snippets.R
@@ -22,12 +22,12 @@ sb_add_snippets <- function(sn_file = "~/.R/snippets/r.snippets"){
       paste(collapse = "\n") %>%
       cat(file = sn_file)
   }
-  if (res){
+  else if (res){
     message("Done!")
     message("Restart RStudio to have access to the snippets.")
-  } else {
+  } else
     message("Copy not done")
-  }
+
 }
 
 # Make snippets