R/AVSDevR.UserFrosting
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed lintr & complexity issues

Browse Source
This commit is contained in:
Craig Williams
2026-02-03 14:51:15 +00:00
parent 771ea0b5f5
commit c7f050a1e4
4 changed files with 8 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
R/UFApi.R
View File

@@ -33,6 +33,7 @@ names(member_list) <- member_names
NULL NULL
#' @export #' @export
# nolint next: object_name_linter. R6Class
UFApi <- R6::R6Class( UFApi <- R6::R6Class(
"UFApi", "UFApi",
public = fn_list, public = fn_list,

1
R/UFDatabase.R
View File

@@ -2,6 +2,7 @@
#' @title UFDatabase #' @title UFDatabase
#' @description UserFrosting Database class #' @description UserFrosting Database class
#' @export #' @export
# nolint next: object_name_linter. R6Class
UFDatabase <- R6::R6Class( UFDatabase <- R6::R6Class(
"UFDatabase", "UFDatabase",
public = list( public = list(

8
R/ufWrapApplication.R
View File

@@ -29,15 +29,15 @@ ufWrapApplication <- function(
isSessionRequired <- function() { isSessionRequired <- function() {
return(!(length(with_users) > 0 && !with_users)) !(length(with_users) > 0 && !with_users)
} }
isSessionValid <- function() { isSessionValid <- function() {
return(ufApi$verifyUFSession(shiny::getQueryString(session))) ufApi$verifyUFSession(shiny::getQueryString(session))
} }
isSessionOptional <- function() { isSessionOptional <- function() {
return(length(user_optional) > 0 && user_optional) (length(user_optional) > 0 && user_optional)
} }
@@ -127,5 +127,5 @@ ufWrapApplication <- function(
wrapped_server wrapped_server
} }
return(app) app
} }