Browse Source

Added GLSL, Japanese dict, smart tabs disable

master
Macoy Madson 2 years ago
parent
commit
d4fe95d88e
  1. 6
      Emacs/language.el
  2. 1
      Emacs/packages.el
  3. 13
      Emacs/syntaxes.el
  4. 2
      Emacs/tags-and-autocompletion.el

6
Emacs/language.el

@ -37,3 +37,9 @@
;; (interactive)
;; (set-input-method 'japanese)
;; (call-interactively 'macoy-find-translation-japanese))
(defun macoy-search-region-sanseido-japanese (start end)
(interactive "r")
(let ((str (buffer-substring-no-properties start end)))
(eww (format "https://www.sanseido.biz/User/Dic/Index.aspx?TWords=%s&st=0&DORDER=&DailyJJ=checkbox&DailyEJ=checkbox&DailyJE=checkbox"
str))))

1
Emacs/packages.el

@ -37,6 +37,7 @@
engine-mode
expand-region
flx-ido
glsl-mode
htmlize
ido-vertical-mode
ido-completing-read+

13
Emacs/syntaxes.el

@ -64,11 +64,13 @@
nil
)
(when (require 'lua-mode)
(setq lua-indent-level 4))
;; Disable due to Emacs 28 not supported
(when (version< emacs-version "28")
(when (require 'lua-mode)
(setq lua-indent-level 4)))
(when (require 'smart-tabs-mode
(smart-tabs-insinuate 'c 'c++)))
;; (when (require 'smart-tabs-mode
;; (smart-tabs-insinuate 'c 'c++)))
;; Highlight function calls
@ -84,3 +86,6 @@
(when (require 'csharp-mode)
(add-to-list 'auto-mode-alist '("\\.cs\\'" . csharp-mode)))
(when (require 'glsl-mode)
(add-to-list 'auto-mode-alist '("\\.shader?\\'" . glsl-mode)))

2
Emacs/tags-and-autocompletion.el

@ -19,6 +19,7 @@
(defun generateTags-ProjectileRoot ()
"Create tags file"
(interactive)
;; Doesn't do anything for start-process
;;(let ((default-directory "F:/CJUNCTIONS/src/")))
(message "Running CTags")
@ -32,6 +33,7 @@
;; Annoyingly there doesn't seem to be wildcard matching for folders (at least
;; not on Windows)
"--exclude=/home/macoy/Development/code/3rdParty/repositories/blender/doc"
"--exclude=/home/macoy/Development/code/repositories/spargus-vehicle-prototype/bullet3/build_cmake"
;; Includes
(projectile-project-root) ;; HOME_ONLY

Loading…
Cancel
Save