From 1e29ccd39d595e631f2ab619a9ec52407970db59 Mon Sep 17 00:00:00 2001
From: James McMahon <james.mcmahon@phs.scot>
Date: Wed, 23 Oct 2024 12:32:49 +0100
Subject: [PATCH] Update test_style_file.R

---
 R/test_style_file.R | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/R/test_style_file.R b/R/test_style_file.R
index 315f69c..0f160b8 100644
--- a/R/test_style_file.R
+++ b/R/test_style_file.R
@@ -1,11 +1,12 @@
 # Test file to check the style action works
 
-obj <- "name"
+obj = "name"
 
 #' Not a real function
 #'
 #' @description
 #' Just a test function - used to test the GH actions only
-fun <- function(var = 1) {
+#' @param var any value
+fun <- function(var =1) {
   return(var)
 }