+fixes

.emacs

@@ -3773,7 +3773,6 @@ _sT_: -time           ^^                  _kc_: Kill Column     ^^
 
 ;; allow me to insert org tables everywhere on request
 (defalias 'table     'hydra-org-tables/body)
-(defalias 't        'hydra-org-tables/body)
 (global-set-key (kbd "C-c t") 'hydra-org-tables/body)
 
 ;; *** org mode slideshows
@@ -5034,6 +5033,22 @@ T - tag prefix
 (defalias 'p 'hydra-projectile/body)
 
 ;; --------------------------------------------------------------------------------
+;; *** Occur
+;; https://oremacs.com/2015/01/26/occur-dwim/
+;; https://github.com/abo-abo/hydra/wiki/Emacs
+(defun occur-dwim ()
+  "Call `occur' with a sane default, chosen as the thing under point or selected region"
+  (interactive)
+  (push (if (region-active-p)
+            (buffer-substring-no-properties
+             (region-beginning)
+             (region-end))
+          (let ((sym (thing-at-point 'symbol)))
+            (when (stringp sym)
+              (regexp-quote sym))))
+        regexp-history)
+  (call-interactively 'occur))
+
 ;; ** Emacs Interface
 ;; *** Parens