From e8a9799bf54ccb6d8792afeb3269317130bd057a Mon Sep 17 00:00:00 2001
From: chainsawriot <chainsawtiney@gmail.com>
Date: Sun, 26 Nov 2023 19:03:10 +0100
Subject: [PATCH] Fix #146 (#147)

* Fix conflict between Rproj and editorconfig

* Add copy nav url ref#146

* Revert "Add copy nav url ref#146"

This reverts commit 279b5ff666f80bcd9e2c93f175b0336b90b93bc5.

* Allow copying the URL
---
 R/auth.R    | 3 ++-
 rtoot.Rproj | 2 +-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/R/auth.R b/R/auth.R
index d97bf6a..acd176b 100644
--- a/R/auth.R
+++ b/R/auth.R
@@ -101,7 +101,8 @@ create_token <- function(client, type = "public", browser = TRUE) {
         if (browser) {
             httr::BROWSE(url, query = query)
         } else {
-            message(paste("Navigate to", httr::modify_url(url, query = query), "to obtain an authorization code"))
+            message(paste("Navigate to", httr::modify_url(url, query = query), "to obtain an authorization code. Press Enter to the next step."))
+            rtoot_ask("", pass = FALSE, check_rstudio = FALSE)
         }
         auth_code <- rtoot_ask(prompt = "enter authorization code: ", pass = TRUE, check_rstudio = TRUE, default = "")
         auth2 <- httr::POST(httr::modify_url(url = url, path = "oauth/token"), body = list(
diff --git a/rtoot.Rproj b/rtoot.Rproj
index 69fafd4..fd8dd28 100644
--- a/rtoot.Rproj
+++ b/rtoot.Rproj
@@ -6,7 +6,7 @@ AlwaysSaveHistory: Default
 
 EnableCodeIndexing: Yes
 UseSpacesForTab: Yes
-NumSpacesForTab: 2
+NumSpacesForTab: 4
 Encoding: UTF-8
 
 RnwWeave: Sweave