From 4fe98e77626afdb46de9f34a366e96228eec705e Mon Sep 17 00:00:00 2001 From: Marcus Kammer Date: Thu, 12 Dec 2024 19:18:05 +0100 Subject: [PATCH 1/2] Replace cl-site url --- init.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/init.el b/init.el index 836aec9f..e708257c 100755 --- a/init.el +++ b/init.el @@ -129,7 +129,7 @@ (setq-default custom-file "~/.emacs.d/bundle/custom_gnu.el" browse-url-secondary-browser-function 'browse-url-firefox) (unless (file-directory-p "~/cl-sites/") - (async-shell-command "git clone git@git.sr.ht:~marcuskammer/cl-sites ~/cl-sites"))) + (async-shell-command "git clone https://code.metalisp.dev/marcuskammer/cl-sites.git ~/cl-sites"))) (when (eq system-type 'windows-nt) (setq-default explicit-shell-file-name From cb18f5238b43e075b98f2e153cf88e9d0e281548 Mon Sep 17 00:00:00 2001 From: Marcus Kammer Date: Thu, 12 Dec 2024 19:20:48 +0100 Subject: [PATCH 2/2] Reformat code --- init.el | 20 +++++++++++++++----- 1 file changed, 15 insertions(+), 5 deletions(-) diff --git a/init.el b/init.el index e708257c..6fdccbdd 100755 --- a/init.el +++ b/init.el @@ -388,11 +388,21 @@ :config (setq auto-insert-query nil) (let ((new-templates - '((("\\.sh\\'" . "Shell script header") nil "#!/bin/bash\n# -*- mode: shell-script; coding: utf-8; -*-\n") - (("\\.js\\'" . "JavaScript header") nil "#!/usr/bin/env node\n// -*- mode: js; coding: utf-8; -*-\n") - (("\\.css\\'" . "CSS header") nil "/* -*- mode: css; coding: utf-8; -*-\n * Dependencies: none\n */\n") - (("\\.html\\'" . "HTML header") nil "\n") - (("\\.lisp\\'" . "Lisp header") nil ";;; -*- mode: lisp; coding: utf-8; -*-\n")))) + '((("\\.sh\\'" . "Shell script header") + nil + "#!/bin/bash\n# -*- mode: shell-script; coding: utf-8; -*-\n") + (("\\.js\\'" . "JavaScript header") + nil + "#!/usr/bin/env node\n// -*- mode: js; coding: utf-8; -*-\n") + (("\\.css\\'" . "CSS header") + nil + "/* -*- mode: css; coding: utf-8; -*-\n * Dependencies: none\n */\n") + (("\\.html\\'" . "HTML header") + nil + "\n") + (("\\.lisp\\'" . "Lisp header") + nil + ";;; -*- mode: lisp; coding: utf-8; -*-\n")))) (setq auto-insert-alist (nconc new-templates auto-insert-alist)))) (use-package tramp