rm superfluous msg from add operator

Author: mwmclean

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: RefManageR
-Version: 0.14.18
+Version: 0.14.19
 Title: Straightforward 'BibTeX' and 'BibLaTeX' Bibliography Management
 Authors@R: person(c("Mathew", "W."), "McLean", role = c("aut", "cre"),
     email = "[email protected]")

R/BibEntryAddOp.R

@@ -81,7 +81,8 @@
       possible.dup <- unlist(e2$bibtype) %in% unlist(e1$bibtype)
     }
     remain.dup.f <- setdiff(fields.to.check, c('bibtype', 'key'))
-    if (length(remain.dup.f)){
+    
+    if (length(remain.dup.f) && length(dup.ind <- possible.dup)){
       dup.ind <- vapply(unclass(e2[possible.dup]),
                       function(x, y, flds){
                         x <- x[flds]
@@ -93,8 +94,6 @@
                     }, FALSE, y = unclass(e1), flds = remain.dup.f)
       if (length(dup.ind))
           dup.ind <- which(dup.ind)
-    }else{
-      dup.ind <- possible.dup
     }
     if (length(dup.ind) == length(e2)){
       message('Only duplicates in second BibEntry object')

inst/NEWS.md

@@ -1,4 +1,4 @@
-Changes in Version 0.14.18 (2017-07-25)
+Changes in Version 0.14.19 (2017-07-26)
 --------------------------------------------------------
 
 NEW FEATURES
@@ -11,6 +11,8 @@ BUG FIXES
 * Remove missing plot from Rhtml vignette
 * URL field returned by `GetBibEntryWithDOI` is now decoded properly
 * Fix hyperlinks from bibliography to citations in vignettes
+* Remove a incorrect message ocassionally output from the addition operator
+for `BibEntry` objects
 
 Changes in Version 0.14.12 (2017-06-30)
 --------------------------------------------------------