From 66497435505e9f9bb8f8331565e93a3dd5515c00 Mon Sep 17 00:00:00 2001
From: Bob Rudis <bob@rudis.net>
Date: Thu, 6 Aug 2015 18:07:36 -0400
Subject: [PATCH] & ! |

---
 R/plugins.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/plugins.R b/R/plugins.R
index ceb5af8..a321490 100644
--- a/R/plugins.R
+++ b/R/plugins.R
@@ -40,7 +40,7 @@ tau_tooltip <- function(tau, fields = NULL) {
 #'   tau_legend()
 tau_legend <- function(tau) {
 
-  if ((!is.null(tau$x$color)) | (!is.null(tau$x$size))) {
+  if ((!is.null(tau$x$color)) & (!is.null(tau$x$size))) {
     message("Neither color nor size aesthetics have been mapped. Legend plugin will be active but not displayed.")
   }