emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/crux 5395c06 076/112: New function: crux-find-user-custom-


From: ELPA Syncer
Subject: [nongnu] elpa/crux 5395c06 076/112: New function: crux-find-user-custom-file
Date: Wed, 11 Aug 2021 09:57:57 -0400 (EDT)

branch: elpa/crux
commit 5395c069295761d4f0d3d2a87da3ca97c019cc68
Author: Jimmy Yuen Ho Wong <wyuenho@gmail.com>
Commit: Bozhidar Batsov <bozhidar.batsov@gmail.com>

    New function: crux-find-user-custom-file
    
    I separate my customizations into a separate file so it can be modified by
    customize independently instead of clobbering my init file. This makes 
visiting
    the file easier.
---
 README.md | 1 +
 crux.el   | 8 ++++++++
 2 files changed, 9 insertions(+)

diff --git a/README.md b/README.md
index bdb4bd7..8d5b373 100644
--- a/README.md
+++ b/README.md
@@ -61,6 +61,7 @@ Command                                             | 
Suggested Keybinding(s)
 `crux-indent-defun`                                 | <kbd>C-M z</kbd> | 
Indent the definition at point.
 `crux-indent-rigidly-and-copy-to-clipboard`         | <kbd>C-c TAB</kbd> | 
Indent and copy region to clipboard
 `crux-find-user-init-file`                          | <kbd>C-c I</kbd> | Open 
user's init file.
+`crux-find-user-custom-file`                        | <kbd>C-c ,</kbd> | Open 
user's custom file.
 `crux-find-shell-init-file`                         | <kbd>C-c S</kbd> | Open 
shell's init file.
 `crux-top-join-line`                                | <kbd>Super-j</kbd> or 
<kbd>C-^</kbd> | Join lines
 `crux-kill-whole-line`                              | <kbd>Super-k</kbd> | 
Kill whole line
diff --git a/crux.el b/crux.el
index deeabea..1886e30 100644
--- a/crux.el
+++ b/crux.el
@@ -566,6 +566,14 @@ Doesn't mess with special buffers."
   (find-file-other-window user-init-file))
 
 ;;;###autoload
+(defun crux-find-user-custom-file ()
+  "Edit the `custom-file', in another window."
+    (interactive)
+    (if custom-file
+        (find-file-other-window custom-file)
+      (message "No custom file found.")))
+
+;;;###autoload
 (defun crux-find-shell-init-file ()
   "Edit the shell init file in another window."
   (interactive)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]