[FIX]Hy Odoo : replace nth
This commit is contained in:
parent
52ed13524b
commit
f7d5ba3465
@ -25,8 +25,8 @@
|
||||
(defmacro hydm [hy-domain]
|
||||
"Generate Odoo domain from Hy like tuple domain"
|
||||
(setv op (second hy-domain)
|
||||
field (mangle (nth hy-domain 2))
|
||||
value (nth hy-domain 3))
|
||||
field (mangle (get hy-domain 2))
|
||||
value (get hy-domain 3))
|
||||
`#(~field ~op ~value))
|
||||
|
||||
; Odoo ORM macros
|
||||
|
@ -102,7 +102,7 @@
|
||||
; Fields
|
||||
(defn field [&rest args]
|
||||
"Special field allowing mangling name attribute"
|
||||
(setv attrs (nth args 0))
|
||||
(setv attrs (get args 0))
|
||||
(when (and (instance? dict attrs) (in "name" attrs))
|
||||
(assoc attrs "name" (mangle (get attrs "name")))
|
||||
(setv args (list args))
|
||||
|
Loading…
x
Reference in New Issue
Block a user