corrected file ending

ebv_metadata_app.R

@@ -607,8 +607,8 @@ server <- function(input, output) {
           output$value <- renderPrint({'Outputpath must be of type character.'})
         } else if(checkmate::checkDirectoryExists(dirname(input$outputpath)) != TRUE){
           output$value <- renderPrint({paste0('Output directory does not exist.\n', dirname(input$outputpath))})
-        } else if(!endsWith(input$outputpath, '.js')){
-          output$value <- renderPrint({'Outputpath needs to end with *.js'})
+        } else if(!endsWith(input$outputpath, '.json')){
+          output$value <- renderPrint({'Outputpath needs to end with *.json'})
         } else {
 
           #check title