aboutsummaryrefslogtreecommitdiffstats
path: root/test/lisp
diff options
context:
space:
mode:
authorPaul Eggert2017-10-01 21:58:52 -0700
committerPaul Eggert2017-10-01 21:58:52 -0700
commit4829a3b033b119b088947d14b73efc197b2547fa (patch)
treeef9a96d2fa02c559ce69ff3ac9a272af84e5f6e9 /test/lisp
parentee3024c70d2974b59ecdd04b75d18d7258262e70 (diff)
parent5172fa02cccaab2500ecf85aaf65b8deed54d42e (diff)
downloademacs-4829a3b033b119b088947d14b73efc197b2547fa.tar.gz
emacs-4829a3b033b119b088947d14b73efc197b2547fa.zip
Merge from origin/emacs-26
5172fa02cc Prefer HTTPS to HTTP for gnu.org 8cdd8b920a Merge from Gnulib 60b7668b89 Keep eww buffer current when looking up CSS on MDN bd49b6f1b3 Workaround for faulty localtime() under macOS 10.6 913808e224 Doc amendment for syntax-ppss. 98dc91fda8 Remove incorrect NEWS entry about 'find-library' 539d8626cd Remove inadvertent changes to syntax.texi in last commit. 8c18dcbc78 Amend documentation for text-quoting-style becoming a user... 5f76ac150a Make the value nil in text-quoting-style mean what it does... d5e4e004fa Make text-quoting-style customizable. Introduce t and new... 1ba3471b9b eshell.texi improvements 7abb5c3960 Fix ns-win.el on GNUstep 07ea5ef99a Fix reference style in org.texi b03b4f6d79 Improve handling of iconification of child frames (Bug#28611) ba9139c501 Revert "Don't lose arguments to eshell aliases (Bug#27954)" 43fac3beae Make "unsafe directory" error message more informative (Bu... c59ddb2120 Fix slot typecheck in eieio-persistent 8b2ab5014b Fix semantic-ia-fast-jump 5b45e7e1c3 Bind vc-region-history f172894595 Exit macro definition on undefined keys 289fe6c0d1 Reset bidi-paragraph-direction on article rendering a4f7518817 Fix url-http use of url-current-object 4a755ed421 Avoid assertions in vc-hg.el on MS-Windows cb93a6ce72 Improve documentation of 'copy-sequence' 200ef6f721 Minor update of ack.texi cb407d3e87 * doc/emacs/emacs.texi (Acknowledgments): Add more contrib... 82b6c765ff Improve indexing of multi-file/buffer Isearch commands 645ff6c702 Add CAM02 JCh and CAM02-UCS J'a'b' conversions 157007b58e Fix uses of @kindex in the Emacs manual 63a45e8837 Merge branch 'emacs-26' of git.savannah.gnu.org:/srv/git/e... 3ab2f9bbb9 Merge from gnulib cbc8324488 Prefer HTTPS to HTTP for gnu.org bbda601d1d ; Spelling fixes 695cf5300b Wait for frame visibility with timeout in w32term too e1f6e3127a Bring back the busy wait after x_make_frame_visible (Bug#2... bccf635217 ; * src/gtkutil.c (xg_check_special_colors): Add another G... f428757cdb Merge branch 'emacs-26' of git.savannah.gnu.org:/srv/git/e... 26d58f0c58 ; Standardize license notices 73dba0f466 Fix last doc string change in simple.el
Diffstat (limited to 'test/lisp')
-rw-r--r--test/lisp/emacs-lisp/eieio-tests/eieio-test-persist.el22
-rw-r--r--test/lisp/replace-tests.el4
-rw-r--r--test/lisp/vc/vc-bzr-tests.el2
3 files changed, 25 insertions, 3 deletions
diff --git a/test/lisp/emacs-lisp/eieio-tests/eieio-test-persist.el b/test/lisp/emacs-lisp/eieio-tests/eieio-test-persist.el
index e2cff3fbcaa..738711c9c84 100644
--- a/test/lisp/emacs-lisp/eieio-tests/eieio-test-persist.el
+++ b/test/lisp/emacs-lisp/eieio-tests/eieio-test-persist.el
@@ -195,6 +195,28 @@ persistent class.")
195 (persist-test-save-and-compare persist-woss) 195 (persist-test-save-and-compare persist-woss)
196 (delete-file (oref persist-woss file)))) 196 (delete-file (oref persist-woss file))))
197 197
198;; A slot that can contain one of two different classes, to exercise
199;; the `or' slot type.
200
201(defclass persistent-random-class ()
202 ())
203
204(defclass persistent-multiclass-slot (eieio-persistent)
205 ((slot1 :initarg :slot1
206 :type (or persistent-random-class null persist-not-persistent))
207 (slot2 :initarg :slot2
208 :type (or persist-not-persistent persist-random-class null))))
209
210(ert-deftest eieio-test-multiple-class-slot ()
211 (let ((persist
212 (persistent-multiclass-slot "random string"
213 :slot1 (persistent-random-class)
214 :slot2 (persist-not-persistent)
215 :file (concat default-directory "test-ps5.pt"))))
216 (unwind-protect
217 (persist-test-save-and-compare persist)
218 (ignore-errors (delete-file (oref persist file))))))
219
198;;; Slot with a list of Objects 220;;; Slot with a list of Objects
199;; 221;;
200;; A slot that contains another object that isn't persistent 222;; A slot that contains another object that isn't persistent
diff --git a/test/lisp/replace-tests.el b/test/lisp/replace-tests.el
index b98406d8ef8..06b6dd8a0a9 100644
--- a/test/lisp/replace-tests.el
+++ b/test/lisp/replace-tests.el
@@ -54,7 +54,7 @@ fx
54 6:fx 54 6:fx
55") 55")
56 ;; * Test multi-line matches, this is the first test from 56 ;; * Test multi-line matches, this is the first test from
57 ;; http://lists.gnu.org/archive/html/emacs-devel/2005-06/msg01008.html 57 ;; https://lists.gnu.org/archive/html/emacs-devel/2005-06/msg01008.html
58 ;; where numbers are replaced with letters. 58 ;; where numbers are replaced with letters.
59 ("a\na" 0 "\ 59 ("a\na" 0 "\
60a 60a
@@ -70,7 +70,7 @@ a
70 :a 70 :a
71") 71")
72 ;; * Test multi-line matches, this is the second test from 72 ;; * Test multi-line matches, this is the second test from
73 ;; http://lists.gnu.org/archive/html/emacs-devel/2005-06/msg01008.html 73 ;; https://lists.gnu.org/archive/html/emacs-devel/2005-06/msg01008.html
74 ;; where numbers are replaced with letters. 74 ;; where numbers are replaced with letters.
75 ("a\nb" 0 "\ 75 ("a\nb" 0 "\
76a 76a
diff --git a/test/lisp/vc/vc-bzr-tests.el b/test/lisp/vc/vc-bzr-tests.el
index e751f562866..85f401eb37b 100644
--- a/test/lisp/vc/vc-bzr-tests.el
+++ b/test/lisp/vc/vc-bzr-tests.el
@@ -106,7 +106,7 @@
106 (should (get-buffer "*vc-log*"))) 106 (should (get-buffer "*vc-log*")))
107 (delete-directory homedir t)))) 107 (delete-directory homedir t))))
108 108
109;; http://lists.gnu.org/archive/html/help-gnu-emacs/2012-04/msg00145.html 109;; https://lists.gnu.org/archive/html/help-gnu-emacs/2012-04/msg00145.html
110(ert-deftest vc-bzr-test-faulty-bzr-autoloads () 110(ert-deftest vc-bzr-test-faulty-bzr-autoloads ()
111 "Test we can generate autoloads in a bzr directory when bzr is faulty." 111 "Test we can generate autoloads in a bzr directory when bzr is faulty."
112 (skip-unless (executable-find vc-bzr-program)) 112 (skip-unless (executable-find vc-bzr-program))