datashield · StuartWheater · Feb 22, 2026 · Feb 20, 2026 · Feb 20, 2026 · Feb 20, 2026
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -5,7 +5,7 @@ Description: Base 'DataSHIELD' functions for the server side. 'DataSHIELD' is a
     been designed to only share non disclosive summary statistics, with built in automated output
     checking based on statistical disclosure control. With data sites setting the threshold values for
     the automated output checks. For more details, see 'citation("dsBase")'.
-Version: 6.3.5.9000
+Version: 6.3.5
 Authors@R: c(person(given = "Paul",
                     family = "Burton",
                     role = c("aut"),

diff --git a/R/glmSLMADS.assign.R b/R/glmSLMADS.assign.R
@@ -18,40 +18,25 @@
 #' @export
 glmSLMADS.assign <- function(formula, family, offsetName, weightsName, dataName){
 
-#############################################################
-#MODULE 1: CAPTURE THE nfilter SETTINGS                     #
-thr <- dsBase::listDisclosureSettingsDS()                   #
-nfilter.tab <- as.numeric(thr$nfilter.tab)                  #
-nfilter.glm <- as.numeric(thr$nfilter.glm)                  #
-#nfilter.subset<-as.numeric(thr$nfilter.subset)             #
-#nfilter.string<-as.numeric(thr$nfilter.string)             #
-#############################################################
+  # Convert transmitable text for special link variance combinations back to full representation
+  if(family=="quasigamma.link_log")
+  {family<-"quasi(link=log,variance=mu^2)"}
 
-########################################
-############
-#Convert transmitable text for special link variance combinations back to full representation
-if(family=="quasigamma.link_log")
-{family<-"quasi(link=log,variance=mu^2)"}
+  if(family=="Gamma.link_log")
+  {family<-"Gamma(link=log)"}
 
-if(family=="Gamma.link_log")
-{family<-"Gamma(link=log)"}
-#############
+  # Correctly name offset, weights and data objects in function call
+  # (to allow glmPredict to work correctly later)
+  calltext <- paste0("mg<-glm(formula,family=",family,",offset=",
+             offsetName,",weights=",weightsName,",data=", dataName,",x=TRUE)")
 
-#Activate family object (this may not be necessary as character string may already be OK
-#but just checking
-final.family.object<-eval(parse(text=family))
+  eval(parse(text=calltext))
 
+  # update the call object to include the actual formula
+  mg$call$formula <- formula
 
-#Correctly name offset, weights and data objects in function call
-#(to allow glmPredict to work correctly later)
-calltext<-paste0("mg<-glm(formula,family=",family,",offset=",
-           offsetName,",weights=",weightsName,",data=", dataName,",x=TRUE)")
-
-eval(parse(text=calltext))
-
-return(mg)		
+  return(mg)
 
 }
-
 # ASSIGN FUNCTION
 # glmSLMADS.assign
diff --git a/azure-pipelines.yml b/azure-pipelines.yml
@@ -253,7 +253,6 @@ jobs:
       echo 'branch:'$(branchName) >> $(datetime).txt
       echo 'os:'$(lsb_release -ds) >> $(datetime).txt
       echo 'R:'$(R --version | head -n 1) >> $(datetime).txt
-      echo 'opal:'$(opal system --opal localhost:8080 --user administrator --password "datashield_test&" --version) >> $(datetime).txt
 
     workingDirectory: $(Pipeline.Workspace)/logs
     displayName: 'Write versions to file'

diff --git a/docs/404.html b/docs/404.html
diff --git a/docs/LICENSE.html b/docs/LICENSE.html
diff --git a/docs/authors.html b/docs/authors.html
diff --git a/docs/index.html b/docs/index.html
diff --git a/docs/pkgdown.yml b/docs/pkgdown.yml
@@ -2,4 +2,4 @@ pandoc: 3.1.3
 pkgdown: 2.2.0
 pkgdown_sha: ~
 articles: {}
-last_built: 2025-11-30T16:44Z
+last_built: 2026-02-20T10:54Z
diff --git a/docs/reference/BooleDS.html b/docs/reference/BooleDS.html
diff --git a/docs/reference/absDS.html b/docs/reference/absDS.html
diff --git a/docs/reference/asCharacterDS.html b/docs/reference/asCharacterDS.html
diff --git a/docs/reference/asDataMatrixDS.html b/docs/reference/asDataMatrixDS.html
diff --git a/docs/reference/asFactorDS1.html b/docs/reference/asFactorDS1.html
diff --git a/docs/reference/asFactorDS2.html b/docs/reference/asFactorDS2.html
diff --git a/docs/reference/asFactorSimpleDS.html b/docs/reference/asFactorSimpleDS.html
diff --git a/docs/reference/asIntegerDS.html b/docs/reference/asIntegerDS.html
diff --git a/docs/reference/asListDS.html b/docs/reference/asListDS.html
diff --git a/docs/reference/asLogicalDS.html b/docs/reference/asLogicalDS.html
diff --git a/docs/reference/asMatrixDS.html b/docs/reference/asMatrixDS.html
diff --git a/docs/reference/asNumericDS.html b/docs/reference/asNumericDS.html
diff --git a/docs/reference/aucDS.html b/docs/reference/aucDS.html
diff --git a/docs/reference/blackBoxDS.html b/docs/reference/blackBoxDS.html
diff --git a/docs/reference/blackBoxRanksDS.html b/docs/reference/blackBoxRanksDS.html
diff --git a/docs/reference/boxPlotGGDS.html b/docs/reference/boxPlotGGDS.html
diff --git a/docs/reference/boxPlotGG_data_TreatmentDS.html b/docs/reference/boxPlotGG_data_TreatmentDS.html
diff --git a/docs/reference/boxPlotGG_data_Treatment_numericDS.html b/docs/reference/boxPlotGG_data_Treatment_numericDS.html
diff --git a/docs/reference/bp_standardsDS.html b/docs/reference/bp_standardsDS.html
diff --git a/docs/reference/cDS.html b/docs/reference/cDS.html
diff --git a/docs/reference/cbindDS.html b/docs/reference/cbindDS.html
diff --git a/docs/reference/changeRefGroupDS.html b/docs/reference/changeRefGroupDS.html
diff --git a/docs/reference/checkNegValueDS.html b/docs/reference/checkNegValueDS.html
diff --git a/docs/reference/checkPermissivePrivacyControlLevel.html b/docs/reference/checkPermissivePrivacyControlLevel.html
diff --git a/docs/reference/classDS.html b/docs/reference/classDS.html
diff --git a/docs/reference/colnamesDS.html b/docs/reference/colnamesDS.html
diff --git a/docs/reference/completeCasesDS.html b/docs/reference/completeCasesDS.html
diff --git a/docs/reference/corDS.html b/docs/reference/corDS.html
diff --git a/docs/reference/corTestDS.html b/docs/reference/corTestDS.html
diff --git a/docs/reference/covDS.html b/docs/reference/covDS.html