From 740a578212a13dbdb276f047c2fa59346defe47f Mon Sep 17 00:00:00 2001
From: JSDurand <mmemmew@gmail.com>
Date: Mon, 19 Jul 2021 09:10:05 +0800
Subject: new: minimal glsl conf

* glsl-conf.el: A minimal configuration to get it working.

* init.el (glsl-mode):
(auto-mode-alist): Add support in init.el.
---
 glsl-conf.el | 38 ++++++++++++++++++++++++++++++++++++++
 init.el      |  9 +++++++++
 2 files changed, 47 insertions(+)
 create mode 100644 glsl-conf.el

diff --git a/glsl-conf.el b/glsl-conf.el
new file mode 100644
index 0000000..9f167ba
--- /dev/null
+++ b/glsl-conf.el
@@ -0,0 +1,38 @@
+;;; glsl-conf.el --- My configurations for glsl-mode  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  李俊緯
+
+;; Author: 李俊緯 <mmemmew@gmail.com>
+;; Keywords: convenience, extensions, faces, files, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; 
+
+;;; Code:
+
+(use-package "glsl" 'glsl)
+
+(setq glsl-other-file-alist
+      '(("\\.frag$" (".vert" ".vs"))
+        ("\\.vert$" (".frag" ".fs"))
+        ("\\.fs$" (".vs" ".vert"))
+        ("\\.vs$" (".fs" ".frag"))))
+
+(define-key glsl-mode-map (vector 'S-tab) #'ff-find-other-file)
+
+(provide 'glsl-conf)
+;;; glsl-conf.el ends here
diff --git a/init.el b/init.el
index 349f2a5..aa61832 100644
--- a/init.el
+++ b/init.el
@@ -149,6 +149,15 @@ no effect."
 (load-after-function pdf-view-mode "pdf.el" "Fake mode that loads the pacakge." nil
 		     (pdf-view-mode))
 
+;;;###autoload
+(load-after-function glsl-mode "glsl-conf.el" "Fake mode that loads the package." nil
+                     (glsl-mode))
+
+(add-to-list 'auto-mode-alist (cons "\\.frag$" #'glsl-mode))
+(add-to-list 'auto-mode-alist (cons "\\.vert$" #'glsl-mode))
+(add-to-list 'auto-mode-alist (cons "\\.fs$" #'glsl-mode))
+(add-to-list 'auto-mode-alist (cons "\\.vs$" #'glsl-mode))
+
 ;;; bongo
 
 ;;;###autoload
-- 
cgit v1.2.3-18-g5258