correct reference to application url

ialyabiev · Jun 3, 2014 · 5d8622e · 5d8622e
1 parent ebee555
commit 5d8622e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/deployApp.R b/R/deployApp.R
@@ -122,7 +122,7 @@ deployApp <- function(appDir = getwd(),
                  application$url)
 
   # append the file to be launched to the URL if necessary
-  amendedUrl <- url
+  amendedUrl <- application$url
 
   if (!is.null(launch.rmd)) {
     # ensure a trailing "/" if there's a chance we'll be adding a filename