Error when using the addin: condition length > 1

[llrs]

Describe the bug
I was using Rstudio (1.4.1717) on visual mode and used the command palette to insert a citation when I noticed this error on the console:

<environment: namespace:htmltools>
 --- function search by body ---
Function tagWrite in namespace htmltools has this body.
 ----------- END OF FAILURE REPORT -------------- 
Warning: Error in if: the condition has length > 1
  104: tagWrite
  103: tagWrite
  102: tagWrite
  101: doRenderTags
  100: processDeps
   99: transform
   98: func
   96: f
   95: Reduce
   86: do
   85: hybrid_chain
   84: renderFunc
   83: output$bib_file
    3: shiny::runApp
    2: runGadget
    1: citr:::insert_citation

To Reproduce

Go to visual edit mode on Rstudio insert citation with citr using the environmental variables below:

_R_CHECK_LENGTH_1_CONDITION_ =${_R_CHECK_LENGTH_1_CONDITION_-verbose}
_R_CHECK_LENGTH_1_LOGIC2_=${_R_CHECK_LENGTH_1_LOGIC2_-verbose}

Expected behavior
No error

Additional context

I'm using R 3.6.3 and htmltools version 0.5.1.1 (from CRAN) and citr 0.3.2 from when it was on CRAN.
I reported it on htmltools rstudio/htmltools#275