[elpa] externals/lentic 4e42c930d7 210/333: Default mode is now the same as the main buffer.

[ELPA Syncer]

branch: externals/lentic
commit 4e42c930d7153bcdff8154a4c527f00f86969af1
Author: Phillip Lord <phillip.lord@newcastle.ac.uk>
Commit: Phillip Lord <phillip.lord@newcastle.ac.uk>

    Default mode is now the same as the main buffer.
    
    This makes more sense anyway.
---
 lentic.el           | 6 ++++--
 test/lentic-test.el | 2 +-
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/lentic.el b/lentic.el
index cf1d49315d..026b39fac2 100644
--- a/lentic.el
+++ b/lentic.el
@@ -306,7 +306,7 @@ for lots of things at once. Returns OBJ."
     :initform nil
     :initarg :lentic-file)
    (lentic-mode
-    :initform 'normal-mode
+    :initform nil
     :initarg :lentic-mode))
   "Configuration which maintains two lentics with the same contents.")
 
@@ -332,7 +332,9 @@ created."
            (format "*lentic: %s*"
                    (buffer-name
                     this-buffer))))
-         (sec-mode (oref conf :lentic-mode))
+         (sec-mode
+          (or (oref conf :lentic-mode)
+              major-mode))
          (sec-file (oref conf :lentic-file)))
     (oset conf :creator t)
     ;; make sure this-buffer knows about that-buffer
diff --git a/test/lentic-test.el b/test/lentic-test.el
index c95a0f6274..31aaeb0337 100644
--- a/test/lentic-test.el
+++ b/test/lentic-test.el
@@ -83,7 +83,7 @@
 
 (ert-deftest lentic-conf ()
   (should
-   (equal 'normal-mode
+   (equal nil
           (oref
            (lentic-default-configuration "bob")
            :lentic-mode))))