fix: separate r and python snippets

package.json

@@ -31,7 +31,11 @@
     "snippets": [
       {
         "language": "python",
-        "path": "./snippets/shiny.json"
+        "path": "./snippets/shiny-python.json"
+      },
+      {
+        "language": "r",
+        "path": "./snippets/shiny-r.json"
       }
     ],
     "commands": [

snippets/shiny.json → snippets/shiny-python.json

@@ -72,41 +72,5 @@
       "\t\treturn f\"Click count is {count()}\"",
       ""
     ]
-  },
-  "Shiny application (R)": {
-    "scope": "r",
-    "prefix": "shinyapp",
-    "body": [
-      "library(shiny)",
-      "library(bslib)",
-      "",
-      "ui <- page_${1:fluid}(",
-      "  ${0}",
-      ")",
-      "",
-      "server <- function(input, output, session) {",
-      "",
-      "}",
-      "",
-      "shinyApp(ui, server)"
-    ]
-  },
-  "Shiny module (R)": {
-    "scope": "r",
-    "prefix": "shinymod",
-    "body": [
-      "${1:name}UI <- function(id) {",
-      "  ns <- NS(id)",
-      "  tagList(",
-      "    ${0}",
-      "  )",
-      "}",
-      "",
-      "${1:name}Server <- function(id) {",
-      "  moduleServer(id, function(input, output, session) {",
-      "    ",
-      "  })",
-      "}"
-    ]
   }
-}
+}

snippets/shiny-r.json

@@ -0,0 +1,38 @@
+{
+  "Shiny application (R)": {
+    "scope": "r",
+    "prefix": "shinyapp",
+    "body": [
+      "library(shiny)",
+      "library(bslib)",
+      "",
+      "ui <- page_${1:fluid}(",
+      "  ${0}",
+      ")",
+      "",
+      "server <- function(input, output, session) {",
+      "",
+      "}",
+      "",
+      "shinyApp(ui, server)"
+    ]
+  },
+  "Shiny module (R)": {
+    "scope": "r",
+    "prefix": "shinymod",
+    "body": [
+      "${1:name}UI <- function(id) {",
+      "  ns <- NS(id)",
+      "  tagList(",
+      "    ${0}",
+      "  )",
+      "}",
+      "",
+      "${1:name}Server <- function(id) {",
+      "  moduleServer(id, function(input, output, session) {",
+      "    ",
+      "  })",
+      "}"
+    ]
+  }
+}