From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:4830:134:3::10]:34980) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fOeur-0008Hc-7t for guix-patches@gnu.org; Fri, 01 Jun 2018 03:56:06 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fOeuo-0005Q0-57 for guix-patches@gnu.org; Fri, 01 Jun 2018 03:56:05 -0400 Received: from debbugs.gnu.org ([208.118.235.43]:48821) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1fOeuo-0005Ps-1F for guix-patches@gnu.org; Fri, 01 Jun 2018 03:56:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1fOeun-0004nd-QU for guix-patches@gnu.org; Fri, 01 Jun 2018 03:56:01 -0400 Subject: [bug#31500] [PATCH 19/21] gnu: Add emacs-image+. References: <20180518184910.9987-1-ambrevar@gmail.com> In-Reply-To: <20180518184910.9987-1-ambrevar@gmail.com> Resent-Message-ID: From: Pierre Neidhardt Date: Fri, 1 Jun 2018 09:55:14 +0200 Message-Id: <20180601075514.30893-1-ambrevar@gmail.com> List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: 31500@debbugs.gnu.org * gnu/packages/emacs.scm (emacs-image+): New variable. --- gnu/packages/emacs.scm | 41 +++++++++++++++++++++++++++++++++++++++++ 1 file changed, 41 insertions(+) diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm index 3308412a7..1eff953ce 100644 --- a/gnu/packages/emacs.scm +++ b/gnu/packages/emacs.scm @@ -11100,3 +11100,44 @@ provided by other Emacs packages dealing with pass: @code{pass}, included in Emacs 26+). @end itemize\n") (license license:gpl3+))) + +(define-public emacs-image+ + (let ((commit "6834d0c09bb4df9ecc0d7a559bd7827fed48fffc")) + (package + (name "emacs-image+") + (version (git-version "0.6.2" "1" commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/mhayashi1120/Emacs-imagex") + (commit commit))) + (file-name (string-append name "-" version "-checkout")) + (sha256 + (base32 + "0v66wk9nh0raih4jhrzmmyi5lbysjnmbv791vm2230ffi2hmwxnd")))) + (build-system emacs-build-system) + (propagated-inputs `(("imagemagick" ,imagemagick))) + (home-page + "https://github.com/mhayashi1120/Emacs-imagex") + (synopsis + "Image manipulate extensions for Emacs") + (description + "Type @code{C-x C-l +} to zoom-in the current image. +You can zoom-out with type @code{-}. +To manipulate a image under cursor: @code{M-x imagex-sticky-mode}. +Or to activate globally: @code{M-x imagex-global-sticky-mode}. +Or in .emacs: @code{(eval-after-load 'image+ '(imagex-global-sticky-mode 1))}. + +@itemize +@item @code{C-c +} / `C-c -`: Zoom in/out image. +@item @code{C-c M-m}: Adjust image to current frame size. +@item @code{C-c C-x C-s}: Save current image. +@item @code{C-c M-r} / @code{C-c M-l}: Rotate image. +@item @code{C-c M-o}: Show image @code{image+} have not modified. +@end itemize + +Adjusted image when open image file: @code{M-x imagex-auto-adjust-mode}. +Or in .emacs: @code{(eval-after-load 'image+ '(imagex-auto-adjust-mode 1))}. +If you do not want error message in minibuffer: @code{(setq imagex-quiet-error t)}.") + (license license:gpl3+)))) -- 2.17.0