File: failed-test

package info (click to toggle)
weechat-el 0.5.0-6
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 396 kB
  • sloc: lisp: 4,503; makefile: 60
file content (45 lines) | stat: -rw-r--r-- 1,915 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
From: Rémi Vanicat <vanicat@debian.org>
Date: Wed, 14 Jun 2017 15:53:33 +0200
Subject: failed-test

===================================================================
---
 weechat-test.el | 18 ++++++++++--------
 1 file changed, 10 insertions(+), 8 deletions(-)

diff --git a/weechat-test.el b/weechat-test.el
index 31e08e4..fd50832 100644
--- a/weechat-test.el
+++ b/weechat-test.el
@@ -68,10 +68,11 @@
     (insert (concat [0 0 0 32 0 255 255 255 255 105 110 102 0 0
                        0 7 118 101 114 115 105 111 110 0 0 0 5
                        48 46 51 46 56]))
-    (let ((data (weechat--relay-parse-new-message (current-buffer))))
-      (should (equal ""  (weechat--message-id data)))
-      (should (equal '("version" . "0.3.8")
-                     (car (weechat--message-data data)))))))
+    (should-error
+     (let ((data (weechat--relay-parse-new-message (current-buffer))))
+                    (should (equal ""  (weechat--message-id data)))
+                    (should (equal '("version" . "0.3.8")
+                                   (car (weechat--message-data data))))))))
 
 
 (ert-deftest weechat-test-id ()
@@ -80,10 +81,11 @@
     (insert (concat [0 0 0 35 0 0 0 0 3 54 54 54 105 110 102 0
                        0 0 7 118 101 114 115 105 111 110 0 0 0
                        5 48 46 51 46 56]))
-    (let ((data (weechat--relay-parse-new-message (current-buffer))))
-      (should (equal "666" (weechat--message-id data)))
-      (should (equal '("version" . "0.3.8")
-                     (car (weechat--message-data data)))))))
+    (should-error
+     (let ((data (weechat--relay-parse-new-message (current-buffer))))
+       (should (equal "666" (weechat--message-id data)))
+       (should (equal '("version" . "0.3.8")
+                      (car (weechat--message-data data))))))))
 
 (ert-deftest weechat-relay-test-connection ()
   (when (weechat-relay-connected-p)