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

Remove unused screenshot function.

Browse Source
This commit is contained in:
KJ 2024-05-09 19:06:58 -04:00
parent e54a28bb9d
commit 536c9d30e3
2 changed files with 0 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
configs/init-functions.el
View File

@ -15,18 +15,6 @@
(interactive "nTransparency Value 0 - 100 opaque:") (interactive "nTransparency Value 0 - 100 opaque:")
(set-frame-parameter nil 'alpha-background value)) (set-frame-parameter nil 'alpha-background value))
;; 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." "Comments or uncomments the region or the current line."

5
configs/init-packages.el
View File

@ -359,11 +359,6 @@
)) ))
) )
;; Paquete para crear imágens (solo lo uso para sacar capturas SVG de emacs)
(use-package silicon
:defer t
:ensure (:host github :repo "iensu/silicon-el"))
;; Mejorando el scroll ;; Mejorando el scroll
(use-package smooth-scrolling (use-package smooth-scrolling
:defer t :defer t