make sure to use second bullet

CSAFE-ISU · May 23, 2024 · 8576e16 · 8576e16
1 parent 2a67277
commit 8576e16
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/app/server.R b/app/server.R
@@ -373,7 +373,7 @@ server <- function(input, output, session) {
   																		Value = c(
   																					BullCompBulls$filename[BullCompBulls$bullet==input$comp_bul1 & BullCompBulls$land == bsldata$landA[odridx[idx]]],
   																					BullCompBulls$md5sum[BullCompBulls$bullet==input$comp_bul1 & BullCompBulls$land == bsldata$landA[odridx[idx]]],
-  																					BullCompBulls$filename[BullCompBulls$bullet==input$comp_bul1 & BullCompBulls$land == bsldata$landA[odridx[idx]]],
+  																					BullCompBulls$filename[BullCompBulls$bullet==input$comp_bul2 & BullCompBulls$land == bsldata$landA[odridx[idx]]],
   																					BullCompBulls$md5sum[BullCompBulls$bullet==input$comp_bul2 & BullCompBulls$land == bsldata$landB[odridx[idx]]],
   																					round(bsldata$ccf[odridx[idx]],3),
   																					round(bsldata$D[odridx[idx]],3),