Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Allow customization of application verbiage. #693

Merged
merged 4 commits into from
Mar 8, 2023
Merged

Allow customization of application verbiage. #693

merged 4 commits into from
Mar 8, 2023

Conversation

samussiah
Copy link
Contributor

@samussiah samussiah commented Jun 27, 2022

i.e. application name, description, and image

@samussiah samussiah requested a review from jwildfire June 27, 2022 16:59
@samussiah samussiah changed the title Fix 692 Allow customization of application verbiage. Jun 27, 2022
Comment on lines 31 to 33
hexPath = system.file("resources/safetyGraphicsHex.png", package = "safetyGraphics"),
homeTabPath = system.file('resources/safetyGraphicsHomeTab.html', package = 'safetyGraphics'),
launchBrowser = FALSE
Copy link
Contributor

Choose a reason for hiding this comment

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

Need to add new params in header

Copy link
Contributor

Choose a reason for hiding this comment

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

Done.

Comment on lines +83 to +91
if (runNow) {
if (launchBrowser == TRUE) {
runApp(app, launch.browser = TRUE)
} else {
runApp(app)
}
}

app
Copy link
Contributor

Choose a reason for hiding this comment

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

Need to try a deploy to shinyapps.io with this update. IIRC the previous code was added to make that work cleanly.

Copy link
Contributor Author

Choose a reason for hiding this comment

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

Captured in #708

Comment on lines 37 to 44
if (!is.character(appName))
appName <- 'safetyGraphics'

if (!is.character(hexPath) || !file.exists(hexPath))
hexPath <- system.file("resources/safetyGraphicsHex.png", package = "safetyGraphics")

if (!is.character(homeTabPath) || !file.exists(homeTabPath))
homeTabPath <- system.file('resources/safetyGraphicsHomeTab.html', package = 'safetyGraphics')
Copy link
Contributor

Choose a reason for hiding this comment

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

Moved this logic to app_startup()

@jwildfire jwildfire merged commit be38a98 into dev Mar 8, 2023
@jwildfire jwildfire deleted the fix-692 branch March 8, 2023 15:13
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

Successfully merging this pull request may close these issues.

2 participants