From af5f6c3924d66104e5425220c23e51cdda9e7311 Mon Sep 17 00:00:00 2001 From: JSDurand Date: Sun, 26 Jun 2022 19:57:13 +0800 Subject: csharp and v in view-mode-map * csharp.el: ("csharp-mode"): Syntax-highlighting for C-sharp files. * view-conf.el: Bind 'v' to `View-scroll-page-forward' in `view-mode-map'. --- csharp.el | 30 ++++++++++++++++++++++++++++++ view-conf.el | 9 ++++++++- 2 files changed, 38 insertions(+), 1 deletion(-) create mode 100644 csharp.el diff --git a/csharp.el b/csharp.el new file mode 100644 index 0000000..8b83afc --- /dev/null +++ b/csharp.el @@ -0,0 +1,30 @@ +;;; csharp.el --- Mode for CSharp -*- lexical-binding: t; -*- + +;; Copyright (C) 2022 李俊緯 + +;; Author: 李俊緯 +;; Keywords: convenience, c, files, languages, 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 . + +;;; Commentary: + +;; A little configuration for Csharp files + +;;; Code: + +(use-package "csharp-mode" 'csharp-mode) + +(provide 'csharp) +;;; csharp.el ends here diff --git a/view-conf.el b/view-conf.el index d7ceeee..ee5eff3 100644 --- a/view-conf.el +++ b/view-conf.el @@ -157,7 +157,10 @@ targets.") "/Users/durand/Desktop/Centre/Vidéos/" "/Users/durand/Desktop/Centre/Musique/" "/Users/durand/Downloads/")) - (list "Messenger" "open" "-a" "Messenger"))) + (list "Messenger" "open" "-a" "Messenger") + (list "temp d'écran" "open" "-b" + "com.apple.systempreferences" + "/System/Library/PreferencePanes/ScreenTime.prefPane"))) ;;;###autoload (defun durand-target-extra-arg (target) @@ -357,3 +360,7 @@ If ARG is non-zero and the second bit is non-zero, toggle (cond ((= (logand arg 2) 2) (variable-pitch-mode 'toggle)))))) + +;;; Press 'v' to scroll + +(define-key view-mode-map (vector ?v) #'View-scroll-page-forward) -- cgit v1.2.3-18-g5258