From 8106b5a5c5634dd4d43be6b466f063a448785b75 Mon Sep 17 00:00:00 2001
From: Craig Oates <craig@craigoates.net>
Date: Mon, 19 Sep 2022 22:53:41 +0100
Subject: [PATCH] rename site-settings function to get-site-settings in nera
 package.

The function call 'site-settings' was clashing with class and package
name 'site-settings'.
---
 src/nera.lisp | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/nera.lisp b/src/nera.lisp
index 8ae23fa..e5148cc 100644
--- a/src/nera.lisp
+++ b/src/nera.lisp
@@ -15,7 +15,7 @@
 	    #:get-user-id
 	    #:delete-user
 	    #:create-user
-	    #:site-settings
+	    #:get-site-settings
 	    #:migrate-all
 	    #:get-all-users
 	    #:update-enable-sign-on-settings
@@ -178,7 +178,7 @@
 	   (mito:delete-dao (mito:find-dao 'page :slug slug)))
 	  (t nil))))
 
-(defun site-settings ()
+(defun get-site-settings ()
   "Gets the settings for the website from the database."
   (with-connection (db)
     (mito:find-dao 'site-settings)))
@@ -227,4 +227,4 @@
 
 (defun system-data ()
   "Gets the website's settings and nav-menu from database."
-  (list (site-settings) (nav-menu-slugs)))
+  (list (get-site-settings) (nav-menu-slugs)))