aboutsummaryrefslogtreecommitdiff
path: root/.emacs.d/init/ycp-help.el
diff options
context:
space:
mode:
Diffstat (limited to '.emacs.d/init/ycp-help.el')
-rw-r--r--.emacs.d/init/ycp-help.el114
1 files changed, 0 insertions, 114 deletions
diff --git a/.emacs.d/init/ycp-help.el b/.emacs.d/init/ycp-help.el
deleted file mode 100644
index b699be9..0000000
--- a/.emacs.d/init/ycp-help.el
+++ /dev/null
@@ -1,114 +0,0 @@
-;;; ycp-help.el -- My configs for help -*- lexical-binding: t -*-
-
-;; Copyright (C) 2023 Free Software Foundation.
-
-;; Author: Yuchen Pei <id@ypei.org>
-;; Protesilaos Stavrou <info@protesilaos.com>
-;; Maintainer: Yuchen Pei <id@ypei.org>
-;; Package-Requires: ((emacs "28.2"))
-
-;; This file is part of dotfiles.
-
-;; dotfiles is free software: you can redistribute it and/or modify it under
-;; the terms of the GNU Affero General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; dotfiles 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 Affero General
-;; Public License for more details.
-
-;; You should have received a copy of the GNU Affero General Public
-;; License along with dotfiles. If not, see <https://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; My configs for help. Covers help, man, woman, eldoc, info etc.
-
-;;; Code:
-
-
-(my-package help-mode
- (my-keybind help-mode-map
- "x" #'describe-command
- "v" #'describe-variable
- "f" #'describe-function)
- (setq help-window-select t)
- (my-keybind global-map
- "C-h h" nil
- "C-h K" #'describe-keymap ; overrides `Info-goto-emacs-key-command-node'
- "C-h c" #'describe-char ; overrides `describe-key-briefly'
- "C-h D" #'shortdoc-display-group
- )
- )
-
-(my-package info
- ;; TODO consider using `Info-additional-directory-list' instead
- (add-to-list 'Info-directory-list (locate-user-emacs-file "info")))
-
-(my-keybind global-map
- "C-h C-f" #'find-function
- "C-h C-l" #'find-library
- "C-h C-v" #'find-variable
- "C-h C-p" #'list-packages)
-(my-setq-from-local find-function-C-source-directory)
-
-(my-package eldoc
- (:delay 5)
- (setq eldoc-echo-area-prefer-doc-buffer t)
- )
-
-(my-package man
- (:delay 10)
- (setq Man-notify-method 'pushy)
- (require 'my-buffer)
- (add-to-list 'my-buffer-create-functions
- '(Man-mode . man)))
-
-(my-package woman
- (:delay 10)
- (require 'my-buffer)
- (add-to-list 'my-buffer-create-functions
- '(woman-mode . woman)))
-
-(my-package help-at-pt
- (setq help-at-pt-timer-delay .2)
- (setq help-at-pt-display-when-idle t)
- (help-at-pt-set-timer))
-
-(my-package my-help
- (:delay 10)
- (my-keybind global-map
- "C-h M" #'my-woman-man
- "C-h i" #'my-info-display-manual
- "C-h ." #'my-describe-symbol-at-point
- "\C-h!" #'my-external-command-open-source)
- (my-keybind help-mode-map
- "o" #'my-help-goto-symbol
- "j" #'my-help-goto-symbol)
- )
-
-(my-configure
- (:delay 10)
- (add-to-list 'my-buffer-create-functions '(Info-mode . 'my-info-display-manual)))
-
-;;;; Tooltips (tooltip-mode)
-(my-package tooltip
- (:delay 15)
- (setq tooltip-delay 0.5
- tooltip-short-delay 0.5
- x-gtk-use-system-tooltips nil
- tooltip-frame-parameters
- '((name . "tooltip")
- (internal-border-width . 6)
- (border-width . 0)
- (no-special-glyphs . t)))
- (autoload #'tooltip-mode "tooltip")
- (tooltip-mode 1))
-
-(my-package my-utils
- (:delay 15)
- (my-setq-from-local my-docs-root-dir))
-
-(provide 'ycp-help)