cosw/gemfin-shiny
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

cat entfernt

Browse Source
This commit is contained in:
Christian Oswald
2026-04-28 14:42:02 +02:00
parent 089a930488
commit db63fecded
1 changed files with 0 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
R/accounts/accounts_tab.R
-1
View File
@@ -80,7 +80,6 @@ accountsServer <- function(id, conn, r_global) {
# ── Gewähltes Konto ──────────────────────────────────────────────────────── # ── Gewähltes Konto ────────────────────────────────────────────────────────
selected_name <- reactive({ selected_name <- reactive({
sel <- get_selected(input$account_tree, format = "names") sel <- get_selected(input$account_tree, format = "names")
cat("raw selected:", paste(sel, collapse=", "), "\n")
if (length(sel) == 0) return(NULL) if (length(sel) == 0) return(NULL)
name <- sub(" \\(\\d+\\)$", "", sel[[1]]) name <- sub(" \\(\\d+\\)$", "", sel[[1]])
cat("cleaned name:", name, "\n") cat("cleaned name:", name, "\n")