emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/objed a0c7e92 7/9: Remove line object from block expans


From: Clemens Radermacher
Subject: [elpa] externals/objed a0c7e92 7/9: Remove line object from block expansion, line object has its own key
Date: Mon, 18 Mar 2019 13:20:58 -0400 (EDT)

branch: externals/objed
commit a0c7e921955b57eb456b01541d512219d64b562c
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>

    Remove line object from block expansion, line object has its own key
---
 objed.el                                     | 2 +-
 test/tests.el                                | 8 ++++++++
 test/tests/emacs-lisp-mode/expansion/block_2 | 3 ++-
 test/tests/emacs-lisp-mode/expansion/block_3 | 2 +-
 test/tests/emacs-lisp-mode/expansion/block_4 | 2 +-
 test/tests/emacs-lisp-mode/expansion/block_5 | 2 +-
 test/tests/emacs-lisp-mode/expansion/block_6 | 2 +-
 7 files changed, 15 insertions(+), 6 deletions(-)

diff --git a/objed.el b/objed.el
index 6d9c407..2982a38 100644
--- a/objed.el
+++ b/objed.el
@@ -1409,7 +1409,7 @@ matches IREGEX is not displayed."
 
 ;; * Basic Movement, Block Objects (textblocks)
 
-(defvar objed--block-objects '(buffer paragraph textblock block indent line)
+(defvar objed--block-objects '(buffer paragraph textblock block indent)
   "List of objects which are 'line based'.
 
 Objects which are built by lines of text.")
diff --git a/test/tests.el b/test/tests.el
index 37cb41c..a557958 100644
--- a/test/tests.el
+++ b/test/tests.el
@@ -3,6 +3,14 @@
 (require 'objed)
 
 ;; TO ADD NEW TESTS CREATE A DIR IN TESTS AND ADD TESTS FILES IN IT.
+(defun objed-run-tests ()
+  (interactive)
+  (let ((buf (or (get-buffer "objed/tests.el")
+                 (find-file-noselect "~/objed/test/tests.el"))))
+    (with-current-buffer buf
+      ;; create tests...
+      (eval-buffer)
+      (ert t))))
 
 (declare-function objed--exit-objed "objed")
 ;; activate on load
diff --git a/test/tests/emacs-lisp-mode/expansion/block_2 
b/test/tests/emacs-lisp-mode/expansion/block_2
index 29eff50..60fbed7 100644
--- a/test/tests/emacs-lisp-mode/expansion/block_2
+++ b/test/tests/emacs-lisp-mode/expansion/block_2
@@ -1,4 +1,4 @@
-hh
+h
 ;;;;
 
 (defun check ()
@@ -19,3 +19,4 @@ hh
 |<;; Some text
 ;; and more text
 >
+
diff --git a/test/tests/emacs-lisp-mode/expansion/block_3 
b/test/tests/emacs-lisp-mode/expansion/block_3
index aa83147..db371c0 100644
--- a/test/tests/emacs-lisp-mode/expansion/block_3
+++ b/test/tests/emacs-lisp-mode/expansion/block_3
@@ -1,4 +1,4 @@
-hhh
+hh
 ;;;;
 
 (defun check ()
diff --git a/test/tests/emacs-lisp-mode/expansion/block_4 
b/test/tests/emacs-lisp-mode/expansion/block_4
index 0c969b6..d760406 100644
--- a/test/tests/emacs-lisp-mode/expansion/block_4
+++ b/test/tests/emacs-lisp-mode/expansion/block_4
@@ -1,4 +1,4 @@
-hhhh
+hhh
 ;;;;
 
 (defun check ()
diff --git a/test/tests/emacs-lisp-mode/expansion/block_5 
b/test/tests/emacs-lisp-mode/expansion/block_5
index c955607..bb726d2 100644
--- a/test/tests/emacs-lisp-mode/expansion/block_5
+++ b/test/tests/emacs-lisp-mode/expansion/block_5
@@ -1,4 +1,4 @@
-hhhhh
+hhhh
 ;;;;
 
 (defun check ()
diff --git a/test/tests/emacs-lisp-mode/expansion/block_6 
b/test/tests/emacs-lisp-mode/expansion/block_6
index 3fa965e..90e8f63 100644
--- a/test/tests/emacs-lisp-mode/expansion/block_6
+++ b/test/tests/emacs-lisp-mode/expansion/block_6
@@ -1,4 +1,4 @@
-hhhhhh
+hhhhh
 ;;;;
 
 (defun check ()



reply via email to

[Prev in Thread] Current Thread [Next in Thread]