From 21b3ab255a605b1a3453fb3f7d56407434831841 Mon Sep 17 00:00:00 2001
From: nik gaffney <nik@fo.am>
Date: Tue, 30 May 2023 13:58:08 +0200
Subject: [PATCH] E8 lattice, Matilda Lotz & Municipality of Gorje.

---
 etherpad-esync.el | 26 +++++++++++++-------------
 etherpad.el       | 10 ++++++++--
 2 files changed, 21 insertions(+), 15 deletions(-)

diff --git a/etherpad-esync.el b/etherpad-esync.el
index f3be60e..f00dc18 100644
--- a/etherpad-esync.el
+++ b/etherpad-esync.el
@@ -47,15 +47,15 @@
 
 ;;; Code:
 
-(require 'websocket)
-(require 'let-alist)
-(require 'calc-bin)
-(require 'parsec)
-(require '0xc)
-(require 's)
+;; (require 'websocket)
+;; (require 'let-alist)
+;; (require 'calc-bin)
+;; (require 'parsec)
+;; (require '0xc)
+;; (require 's)
 
 ;; debug details
-(setq websocket-debug t)
+;; (setq websocket-debug t)
 
 ;; local and buffer local variables
 (defvar-local etherpad-esync--pre-buffer-length 0)
@@ -136,12 +136,12 @@
   (message "setting up buffer change hooks")
   (with-current-buffer etherpad-esync-buffer
     (add-hook 'before-change-functions
-              'etherpad-esync--before-buffer-changes nil t)
+              #'etherpad-esync--before-buffer-changes nil t)
     ;; ordering is important...
     (add-hook 'after-change-functions
-              'etherpad-esync--after-buffer-changes 22 t)
+              #'etherpad-esync--after-buffer-changes 22 t)
     (add-hook 'after-change-functions
-              'etherpad-esync--send-changes 23 t)))
+              #'etherpad-esync--send-changes 23 t)))
 
 (defun etherpad-esync--remove-change-hooks ()
   "Remove predefined change hooks."
@@ -149,11 +149,11 @@
   (message "removing buffer change hooks")
   (with-current-buffer etherpad-esync-buffer
     (remove-hook 'before-change-functions
-                 'etherpad-esync--before-buffer-changes t)
+                 #'etherpad-esync--before-buffer-changes t)
     (remove-hook 'after-change-functions
-                 'etherpad-esync--after-buffer-changes t)
+                 #'etherpad-esync--after-buffer-changes t)
     (remove-hook 'after-change-functions
-                 'etherpad-esync--send-changes t)))
+                 #'etherpad-esync--send-changes t)))
 
 
 (defun etherpad-esync--before-buffer-changes (begin end)
diff --git a/etherpad.el b/etherpad.el
index 3af9d82..bb91b5e 100644
--- a/etherpad.el
+++ b/etherpad.el
@@ -5,7 +5,7 @@
 ;; Author: nik gaffney <nik@fo.am>
 ;; Created: 2020-08-08
 ;; Version: 0.1
-;; Package-Requires: ((emacs "26.3") (request "0.3") (let-alist "0.0") (websocket "1.12") (parsec "0.1") (0xc "0.1"))
+;; Package-Requires: ((emacs "27.1") (request "0.3") (let-alist "0.0") (websocket "1.12") (parsec "0.1") (0xc "0.1"))
 ;; Keywords: comm, etherpad, collaborative editing
 ;; URL: https://github.com/zzkt/ethermacs
 
@@ -48,10 +48,16 @@
 
 (add-to-list 'load-path ".")
 
-;; (require 'let-alist)
 (require 'etherpad-esync)
+(require 'let-alist)
+(require 'websocket)
+(require 'calc-bin)
 (require 'request)
 (require 'cl-lib)
+(require 'parsec)
+(require '0xc)
+(require 's)
+
 
 (defgroup etherpad nil
   "Etherpad edits."