diff --git a/DESCRIPTION b/DESCRIPTION
index 79387ef..18f4dcf 100755
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -2,7 +2,7 @@ Package: MESS
 Type: Package
 Title: Miscellaneous Esoteric Statistical Scripts
 Version: 0.5.12
-Date: 2022-10-25
+Date: 2023-07-21
 Authors@R: c(person(given="Claus Thorn", family="Ekstrøm", role = c("aut", "cre"), email = "claus@rprimer.dk"),
              person(given="Niels Aske Lundtorp", family="Olsen", role=c("ctb"), email="nalo@dtu.dk"))
 Maintainer: Claus Thorn Ekstrøm <claus@rprimer.dk>
@@ -37,4 +37,4 @@ BugReports: https://github.com/ekstroem/MESS/issues
 Encoding: UTF-8
 ByteCompile: true
 License: GPL-2
-RoxygenNote: 7.2.1
+RoxygenNote: 7.2.3
diff --git a/NEWS.md b/NEWS.md
index 89efed0..7fa9114 100755
--- a/NEWS.md
+++ b/NEWS.md
@@ -5,6 +5,7 @@
 
 *   Fixed code to match changes to the Matrix package
 *   Added improved residuals for Wallyplot thanks to Niels Aske Lundtorp Olsen
+*   Fixed a bug in adaptive.weights()
 
 # MESS 0.5.9
 
diff --git a/R/adaptive.weights.R b/R/adaptive.weights.R
index cb1377f..fed8669 100755
--- a/R/adaptive.weights.R
+++ b/R/adaptive.weights.R
@@ -40,7 +40,7 @@ adaptive.weights <- function(x, y, nu=1, weight.method=c("multivariate", "univar
     weight.method <- match.arg(weight.method)
 
     nobs <- nrow(x)
-    if (nobs+1 <= ncol(x)) {
+    if ((nobs+1) <= ncol(x)) {
         warning("using univariate weight method since p>n")
         weight.method <- "univariate"
     }