Skip to content
Open
Changes from 1 commit
Commits
Show all changes
20 commits
Select commit Hold shift + click to select a range
63895b0
buildignore inst/tmp/
gadenbuie Jun 1, 2020
72a9b39
Remove inst/tmp files
gadenbuie Jun 2, 2020
16f302b
Maintain search params and hash components of URL
gadenbuie Jun 2, 2020
b842737
Document paths(), export paths(), blaze() and as_path() S3 methods
gadenbuie Jun 2, 2020
248d965
Bump dev version, update authors
gadenbuie Jun 2, 2020
c525610
Remove search and hash components of URL when sending browser state u…
gadenbuie Jun 2, 2020
733d41a
Update documentation to use roxygen function links
gadenbuie Jun 2, 2020
e9ee710
Fix function signature of .onLoad() to appease R CMD check
gadenbuie Jun 2, 2020
01aa30b
Adds {utils} to dependencies for packageVersion()
gadenbuie Jun 2, 2020
13a3a14
Unexport param(), it's not ready yet
gadenbuie Jun 2, 2020
c355ff7
Add at least one basic test
gadenbuie Jun 2, 2020
56ba9dc
Don't update path if same as current, also send updates back to server
gadenbuie Jun 2, 2020
d2b70aa
Add app_path argument to paths()
gadenbuie Jun 8, 2020
1019a39
Redirect pages need to redirect to /app_path
gadenbuie Jun 8, 2020
e8b168c
Ensure that getPath() returns "/" when app_path is set
gadenbuie Jun 8, 2020
8d0c7cd
Prepend app_path after checking path input in pushPath
gadenbuie Jun 8, 2020
249eaae
Add path_app() and ensure pathLink() respects global app_path
gadenbuie Jun 8, 2020
7938bf2
Reset app_path if app_path = NULL when calling paths() in same session
gadenbuie Jun 8, 2020
99a4265
observePath() correctly handles leading route path slash
gadenbuie Jun 8, 2020
e8da98d
Add option to push or replace path in pushPath()
gadenbuie Jul 15, 2020
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
4 changes: 2 additions & 2 deletions R/paths.R
Original file line number Diff line number Diff line change
Expand Up @@ -100,10 +100,10 @@ paths <- function(..., app_path = NULL) {
old <- setwd(tmp)
on.exit(setwd(old))

if (!is.null(app_path)) {
.globals$app_path <- if (!is.null(app_path)) {
Copy link
Owner

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

I'd prefer not to use this sort of short-hand.

app_path <- gsub("^/|/$", "", app_path)
dir_create(app_path, recurse = TRUE)
.globals$app_path <- app_path
app_path
}

lapply(routes, function(route) {
Expand Down