Update python mode issues

 - remove old cperl stub
 - update select-enable-{clipboard,primary} lines

diff --git a/emacs_el/configuration/don-configuration.org b/emacs_el/configuration/don-configuration.org
index d256be851bae8c4b1327869d9b9560df0d0f1f87..b384f584fc7bc52ecaf7fa577a55d13809712e5c 100644 (file)
--- a/emacs_el/configuration/don-configuration.org
+++ b/emacs_el/configuration/don-configuration.org
@@ -1396,40 +1396,43 @@ From http://julien.danjou.info/projects/emacs-packages#rainbow-mode, this colori
 
 ** Python Programming
 #+BEGIN_SRC emacs-lisp
-  (use-package python-mode
-    :hook
-    (python-mode . pyenv-mode)
-    (python-mode . flycheck-mode)
-    (python-mode . company-mode)
-    (python-mode . blacken-mode)
-    (python-mode . yas-minor-mode)
-    )
-  (use-package pyenv
-    :ensure t
-    )
-  (use-package blacken
-    :init
-    (setq-default blacken-fast-unsafe t)
-    (setq-default blacken-line-length 80)
-    :ensure t)
+(use-package python-mode
+  :hook
+  (python-mode . pyenv-mode)
+  (python-mode . flycheck-mode)
+  (python-mode . company-mode)
+  (python-mode . blacken-mode)
+  (python-mode . yas-minor-mode)
+  (python-mode . anaconda-mode)
+  )
+(use-package pyenv
+  :ensure t
+  )
+(use-package blacken
+  :init
+  (setq-default blacken-fast-unsafe t)
+  (setq-default blacken-line-length 80)
+  :ensure t)
+(use-package anaconda-mode
+  :ensure t
+  )
 
-  
-  (use-package elpy
-    :ensure t
-    :init
-    (elpy-enable)
-    )
-#+END_SRC
-*** Jedi
-#+BEGIN_SRC emacs-lisp
-  (use-package company-jedi
-    :ensure t
-    :hook (python-mode . (add-to-list 'company-backends 'company-jedi))
-    :hook (python-mode  . 'jedi:setup)
-    :config
-    (setq jedi:complete-on-dot t)
-    )
+(use-package elpy
+  :ensure t
+  :init
+  (elpy-enable)
+  )
 #+END_SRC
+# *** Jedi
+# #+BEGIN_SRC emacs-lisp
+#   (use-package company-jedi
+#     :ensure t
+#     :hook (python-mode . (add-to-list 'company-backends 'company-jedi))
+#     :hook (python-mode  . 'jedi:setup)
+#     :config
+#     (setq jedi:complete-on-dot t)
+#     )
+# #+END_SRC
 *** Black
 #+begin_src emacs-lisp :tangle yes
   (use-package python-black
@@ -2319,7 +2322,7 @@ as the default task."
   ;; We're in the agenda
   ;;
   (let* ((marker (org-get-at-bol 'org-hd-marker))
-         (tags (org-with-point-at marker (org-get-tags-at))))
+         (tags (org-with-point-at marker (org-get-tags))))
     (if (and (eq arg 4) tags)
         (org-agenda-clock-in '(16))
       (bh/clock-in-organization-task-as-default)))
@@ -2628,18 +2631,15 @@ same directory as the org-buffer and insert a link to this file."
           (string-equal system-type "windows")
           )
       (progn
-        (setq x-select-enable-clipboard t)
-        (setq x-select-enable-primary nil)
+        (setq select-enable-clipboard t)
+        (setq select-enable-primary nil)
         )
     (progn
-      (setq x-select-enable-clipboard nil)
-      (setq x-select-enable-primary t)
+      (setq select-enable-clipboard nil)
+      (setq select-enable-primary t)
       ))
   ; (setq mouse-drag-copy-region t)
 
-  (fset 'perl-mode 'cperl-mode)
-  ;;(load-file "cperl-mode.el")
-
   ;; tramp configuration
   (setq tramp-use-ssh-controlmaster-options nil)