2 files changed, 21 insertions(+), 0 deletions(-)

M init.el
A lisp/android-setup.el

@@ 2,6 2,7 @@
 ;;; Commentary: Emacs Startup File --- initialization for Emacs
 
 (add-to-list 'load-path (locate-user-emacs-file "lisp/"))
+(require 'android-setup nil t)
 (require 'custom-setup nil t)
 (require 'functions)
 (require 'elpaca-loader)

@@ 0,0 1,20 @@
+;; Android early setup
+(when (eq window-system 'android)
+  (setenv "PATH" (format "%s:%s" "/data/data/com.termux/files/usr/bin" (getenv "PATH")))
+
+  (push "/data/data/com.termux/files/usr/bin" exec-path)
+
+  (customize-set-variable 'touch-screen-display-keyboard t)
+
+  (with-eval-after-load 'evil
+    (evil-define-key nil evil-normal-state-map
+      [mouse-1] 'mouse-set-point
+      [down-mouse-1] 'mouse-drag-region
+      [drag-mouse-1] 'mouse-drag-region))
+
+  (set-text-conversion-style nil)
+  (add-hook
+  'after-change-major-mode-hook
+  (lambda () (set-text-conversion-style nil))))
+
+(provide 'android-setup)