kj/confi-emacs-actual
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Add 2 ways to take code screenshots (maybe unnesearry, but why not).

Browse Source
This commit is contained in:
kj 2022-07-12 16:36:51 -04:00
parent a27d677716
commit 9ee088a832
3 changed files with 17 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitignore vendored
View File

@ -19,3 +19,4 @@ var/
eclipse.jdt.ls/ eclipse.jdt.ls/
workspace/ workspace/
/.extension/ /.extension/
/diary

4
configs/base-extensions.el
View File

@ -270,6 +270,10 @@
(setq mouse-wheel-progressive-speed nil) ; Deshabilita la velocidad progresiva del scroll (mientras más scroll haces, mas rápido va) (setq mouse-wheel-progressive-speed nil) ; Deshabilita la velocidad progresiva del scroll (mientras más scroll haces, mas rápido va)
) )
(use-package silicon
:ensure t
:straight (silicon :type git :host github :repo "iensu/silicon-el"))
(use-package tree-sitter (use-package tree-sitter
:defer t :defer t
:straight t :straight t

12
configs/base-functions.el
View File

@ -7,6 +7,18 @@
;;; Code: ;;; Code:
;; Crear captura SVG del frame atual. Fuente: https://www.reddit.com/r/emacs/comments/idz35e/emacs_27_can_take_svg_screenshots_of_itself/
(defun screenshot-svg ()
"Save a screenshot of the current frame as an SVG image.
Saves to a temp file and puts the filename in the kill ring."
(interactive)
(let* ((filename (make-temp-file "Emacs" nil ".svg"))
(data (x-export-frames nil 'svg)))
(with-temp-file filename
(insert data))
(kill-new filename)
(message filename)))
;; Comentar línea o región ;; Comentar línea o región
(defun comment-or-uncomment-region-or-line () (defun comment-or-uncomment-region-or-line ()
"Comments or uncomments the region or the current line if there's no active region." "Comments or uncomments the region or the current line if there's no active region."