Python org-babel, scroll lines by 2

This commit is contained in:
Joseph Ferano 2023-01-05 22:20:03 +07:00
parent 0fda5213de
commit 8fa59624d8

View File

@ -49,7 +49,8 @@ Disable package.el, since we will be using straight.el. According to the straigh
documentation; documentation;
#+BEGIN_QUOTE #+BEGIN_QUOTE
While it is technically possible to use both package.el and straight.el at the same time, there is no real reason to, and it might result in oddities like packages getting loaded more than once. While it is technically possible to use both package.el and straight.el at the same time, there is
no real reason to, and it might result in oddities like packages getting loaded more than once.
#+END_QUOTE #+END_QUOTE
Either way, if you need to quickly install a package for testing, you can just run Either way, if you need to quickly install a package for testing, you can just run
@ -59,6 +60,7 @@ Either way, if you need to quickly install a package for testing, you can just r
(setq package-enable-at-startup nil) (setq package-enable-at-startup nil)
#+END_SRC #+END_SRC
*** Enhancements *** Enhancements
Prioritize old byte-compiled source files over newer sources. It saves us a little IO time to skip all the mtime checks on each lookup. Prioritize old byte-compiled source files over newer sources. It saves us a little IO time to skip all the mtime checks on each lookup.
#+begin_src emacs-lisp :tangle ./early-init.el #+begin_src emacs-lisp :tangle ./early-init.el
@ -761,6 +763,11 @@ The theme of `C-x 4` bindings is that they operate on other windows, so this fun
(interactive) (interactive)
(joe/pixel-scroll-lerp 8 1)) (joe/pixel-scroll-lerp 8 1))
(defun joe/scroll-up-line () (interactive) (scroll-up-line 2))
(defun joe/scroll-down-line () (interactive) (scroll-down-line 2))
(evil-global-set-key 'normal (kbd "C-e") #'joe/scroll-up-line)
(evil-global-set-key 'normal (kbd "C-y") #'joe/scroll-down-line)
;; scroll-up-command ;; scroll-up-command
(global-set-key (kbd "C-v") #'joe/smooth-scroll-half-page-down) (global-set-key (kbd "C-v") #'joe/smooth-scroll-half-page-down)
(global-set-key (kbd "M-v") #'joe/smooth-scroll-half-page-up) (global-set-key (kbd "M-v") #'joe/smooth-scroll-half-page-up)
@ -1032,6 +1039,7 @@ targets."
'((emacs-lisp . t) '((emacs-lisp . t)
(makefile . t) (makefile . t)
(ocaml . t) (ocaml . t)
(python . t)
(C . t) (C . t)
(rust . t) (rust . t)
(shell . t))) (shell . t)))
@ -1040,6 +1048,7 @@ targets."
(add-to-list 'org-structure-template-alist '("el" . "src emacs-lisp")) (add-to-list 'org-structure-template-alist '("el" . "src emacs-lisp"))
(add-to-list 'org-structure-template-alist '("ml" . "src ocaml")) (add-to-list 'org-structure-template-alist '("ml" . "src ocaml"))
(add-to-list 'org-structure-template-alist '("rs" . "src rust")) (add-to-list 'org-structure-template-alist '("rs" . "src rust"))
(add-to-list 'org-structure-template-alist '("py" . "src python"))
(setq org-edit-src-content-indentation 0)) (setq org-edit-src-content-indentation 0))
(with-eval-after-load 'org (joe/org-init)) (with-eval-after-load 'org (joe/org-init))
@ -1168,6 +1177,13 @@ startup. Reason we have to call this is so the vterm fucntion can call `vterm--i
;; (global-set-key [remap hippie-expand] 'dabbrev-expand) ;; (global-set-key [remap hippie-expand] 'dabbrev-expand)
;; (global-set-key (kbd "M-/") 'dabbrev-expand) ;; (global-set-key (kbd "M-/") 'dabbrev-expand)
;; (straight-use-package 'fancy-dabbrev)
;; (global-set-key (kbd "TAB") 'fancy-dabbrev-expand-or-indent)
;; (global-set-key (kbd "<backtab>") 'fancy-dabbrev-backward)
;; (global-set-key (kbd "TAB") 'indent-for-tab-command)
;; (global-set-key (kbd "<backtab>") nil)
;; (straight-use-package 'kind-icon) ;; (straight-use-package 'kind-icon)
;; (require 'kind-icon) ;; (require 'kind-icon)