fix chg to add op

mwmclean · mwmclean · commit ec2acae8456d · 2017-07-25T17:52:22.000+10:00
diff --git a/R/BibEntryAddOp.R b/R/BibEntryAddOp.R
@@ -82,7 +82,7 @@
     }
     remain.dup.f <- setdiff(fields.to.check, c('bibtype', 'key'))
     
-    if (length(remain.dup.f) && length(dup.ind <- possible.dup)){
+    if (length(dup.ind <- possible.dup) && length(remain.dup.f)){
       dup.ind <- vapply(unclass(e2[possible.dup]),
                       function(x, y, flds){
                         x <- x[flds]

Original file line number	Diff line number	Diff line change
`@@ -82,7 +82,7 @@`
`82`	`82`	`}`
`83`	`83`	`remain.dup.f <- setdiff(fields.to.check, c('bibtype', 'key'))`
`84`	`84`
`85`		`- if (length(remain.dup.f) && length(dup.ind <- possible.dup)){`
	`85`	`+ if (length(dup.ind <- possible.dup) && length(remain.dup.f)){`
`86`	`86`	`dup.ind <- vapply(unclass(e2[possible.dup]),`
`87`	`87`	`function(x, y, flds){`
`88`	`88`	`x <- x[flds]`