workgroups2 Changeset - f53f86b41a75

Changeset - f53f86b41a75

Parent rev.

Child rev.

[Not reviewed]

0 1 0

Sergey Pashinin - 11 years ago 2014-08-29 11:51:51
sergey@pashinin.com

Serialization test small fixes

1 file changed with 6 insertions and 7 deletions:

tests/workgroups2-tests.el

0 comments (0 inline, 0 general)

tests/workgroups2-tests.el

➞

Show inline comments

@@ @@ -102,28 +102,27 @@ @@
       (error "WG session file wasn't created"))))
 ;; Test serialization functions
 (defmacro test-pickel (value)
   "Test `wg-pickel' `wg-unpickel' on VALUE."
   `(progn
      (wg-unpickel (wg-pickel ,value))))
+     (eq (wg-unpickel (wg-pickel ,value)) ,value)))
 (ert-deftest 110-wg-pickel ()
   (test-pickel 123)
   (test-pickel "str")
   (test-pickel 'symbol)
   (test-pickel (current-buffer))
   ;; (get-buffer org-agenda-buffer-name)
   (test-pickel (point-marker))
   (test-pickel (current-buffer))  ; #<buffer tests.el>
   (test-pickel (point-marker))    ; #<marker at 3427 in tests.el>
   (test-pickel (make-marker))     ; #<marker in no buffer>
   (test-pickel (list 'describe-variable 'help-xref-stack-item (get-buffer "*Help*")))
   ;; TODO:
   ;;(test-pickel (current-window-configuration))
+  )
 ;;
 ;; Special buffers
 ;;
 (require 'python)
 (ert-deftest 300-special-modes ()

0 comments (0 inline, 0 general)