[Emacs-diffs] trunk r117008: Fix cl-lib-struct-accessors test again.

[Daniel Colascione]

------------------------------------------------------------
revno: 117008
revision-id: address@hidden
parent: address@hidden
committer: Daniel Colascione <address@hidden>
branch nick: trunk
timestamp: Mon 2014-04-21 23:45:41 -0700
message:
  Fix cl-lib-struct-accessors test again.
  
  * test/automated/cl-lib.el (cl-lib-struct-accessors): Fix test to
  account for removal of `cl-struct-set-slot-value'. Also, move
  the defstruct to top level.
modified:
  test/automated/cl-lib.el       cllib.el-20130711160611-o23w1tyz0y13jq8e-1

=== modified file 'test/automated/cl-lib.el'
--- a/test/automated/cl-lib.el  2014-04-22 03:51:12 +0000
+++ b/test/automated/cl-lib.el  2014-04-22 06:45:41 +0000
@@ -201,8 +201,8 @@
                     :b :a :a 42)
            '(42 :a))))
 
+(cl-defstruct mystruct (abc :readonly t) def)
 (ert-deftest cl-lib-struct-accessors ()
-  (cl-defstruct mystruct (abc :readonly t) def)
   (let ((x (make-mystruct :abc 1 :def 2)))
     (should (eql (cl-struct-slot-value 'mystruct 'abc x) 1))
     (should (eql (cl-struct-slot-value 'mystruct 'def x) 2))