add delay before lexicon popup and add exclude if dragging.

src/components/verse-objects/AlignedWordsObject.js

@@ -1,4 +1,9 @@
-import React, { useState, useContext } from 'react';
+import React,
+{
+  useContext,
+  useEffect,
+  useState,
+} from 'react';
 import PropTypes from 'prop-types';
 import { makeStyles } from '@material-ui/core/styles';
 import { Popover } from '@material-ui/core';
@@ -20,15 +25,37 @@ function AlignedWordsObject({
 }) {
   const classes = useStyles();
   const [anchorEl, setAnchorEl] = useState(null);
+  const [openPop, setOpenPopup] = useState(false);
+  const [timedOut, setTimeout] = useState(false);
 
   const handleOpen = (event) => {
-    setAnchorEl(event.currentTarget);
+    if (!event.buttons) { // only show popup if buttons not depressed (dragging)
+      // make sure states are cleared
+      setTimeout(false);
+      setOpenPopup(false);
+
+      setAnchorEl(event.currentTarget); // save the anchor element for positioning
+
+      delay(500).then(() => { // delay 1/2 sec. before showing popup
+        setTimeout(true);
+      });
+    }
   };
 
   const handleClose = () => {
     setAnchorEl(null);
+    setOpenPopup(false);
   };
 
+  useEffect(() => {
+    if (timedOut) { // if timer times out
+      if (anchorEl && !openPop) { // show popup if we have a position and not yet open
+        setOpenPopup(true);
+      }
+      setTimeout(false); // clear timout after use
+    }
+  }, [timedOut]);
+
   let selected;
   const _selectionsContext = useContext(SelectionsContext);
 
@@ -86,7 +113,7 @@ function AlignedWordsObject({
   }
 
   if (!disableWordPopover) {
-    const open = Boolean(anchorEl);
+    const open = openPop && Boolean(anchorEl);
     const id = open ? 'popover' : undefined;
     const _originalWords = originalWords.map((verseObject, index) => getOriginalWordObject(index, verseObject));
 
@@ -151,4 +178,10 @@ function translate_(key) {
   return key;
 }
 
+function delay(ms) {
+  return new Promise((resolve) =>
+      setTimeout(resolve, ms),
+  )
+}
+
 export default AlignedWordsObject;