diff --git a/elpa/transpose-frame-20200307.2119/transpose-frame-pkg.el b/elpa/transpose-frame-20200307.2119/transpose-frame-pkg.el deleted file mode 100644 index 567d33e3..00000000 --- a/elpa/transpose-frame-20200307.2119/transpose-frame-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; Generated package description from transpose-frame.el -*- no-byte-compile: t -*- -(define-package "transpose-frame" "20200307.2119" "Transpose windows arrangement in a frame" 'nil :commit "12e523d70ff78cc8868097b56120848befab5dbc" :authors '(("S. Irie")) :maintainer '("S. Irie") :keywords '("window")) diff --git a/elpa/transpose-frame-20200307.2119/transpose-frame-autoloads.el b/elpa/transpose-frame-20221109.2053/transpose-frame-autoloads.el similarity index 66% rename from elpa/transpose-frame-20200307.2119/transpose-frame-autoloads.el rename to elpa/transpose-frame-20221109.2053/transpose-frame-autoloads.el index c36d108c..388f572e 100644 --- a/elpa/transpose-frame-20200307.2119/transpose-frame-autoloads.el +++ b/elpa/transpose-frame-20221109.2053/transpose-frame-autoloads.el @@ -1,59 +1,58 @@ -;;; transpose-frame-autoloads.el --- automatically extracted autoloads -;; +;;; transpose-frame-autoloads.el --- automatically extracted autoloads (do not edit) -*- lexical-binding: t -*- +;; Generated by the `loaddefs-generate' function. + +;; This file is part of GNU Emacs. + ;;; Code: -(add-to-list 'load-path (directory-file-name - (or (file-name-directory #$) (car load-path)))) +(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path))) + -;;;### (autoloads nil "transpose-frame" "transpose-frame.el" (0 0 -;;;;;; 0 0)) ;;; Generated autoloads from transpose-frame.el (autoload 'transpose-frame "transpose-frame" "\ Transpose windows arrangement at FRAME. Omitting FRAME means currently selected frame. -\(fn &optional FRAME)" t nil) - +(fn &optional FRAME)" t) (autoload 'flip-frame "transpose-frame" "\ Flip windows arrangement vertically at FRAME. Omitting FRAME means currently selected frame. -\(fn &optional FRAME)" t nil) - +(fn &optional FRAME)" t) (autoload 'flop-frame "transpose-frame" "\ Flop windows arrangement horizontally at FRAME. Omitting FRAME means currently selected frame. -\(fn &optional FRAME)" t nil) - +(fn &optional FRAME)" t) (autoload 'rotate-frame "transpose-frame" "\ Rotate windows arrangement 180 degrees at FRAME. Omitting FRAME means currently selected frame. -\(fn &optional FRAME)" t nil) - +(fn &optional FRAME)" t) (autoload 'rotate-frame-clockwise "transpose-frame" "\ Rotate windows arrangement 90 degrees clockwise at FRAME. Omitting FRAME means currently selected frame. -\(fn &optional FRAME)" t nil) - +(fn &optional FRAME)" t) (autoload 'rotate-frame-anticlockwise "transpose-frame" "\ Rotate windows arrangement 90 degrees anti-clockwise at FRAME. Omitting FRAME means currently selected frame. -\(fn &optional FRAME)" t nil) +(fn &optional FRAME)" t) +(register-definition-prefixes "transpose-frame" '("transpose-frame-")) + +;;; End of scraped data -(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "transpose-frame" '("transpose-frame-"))) +(provide 'transpose-frame-autoloads) -;;;*** - ;; Local Variables: ;; version-control: never ;; no-byte-compile: t ;; no-update-autoloads: t -;; coding: utf-8 +;; no-native-compile: t +;; coding: utf-8-emacs-unix ;; End: + ;;; transpose-frame-autoloads.el ends here diff --git a/elpa/transpose-frame-20221109.2053/transpose-frame-pkg.el b/elpa/transpose-frame-20221109.2053/transpose-frame-pkg.el new file mode 100644 index 00000000..ddb8f004 --- /dev/null +++ b/elpa/transpose-frame-20221109.2053/transpose-frame-pkg.el @@ -0,0 +1,11 @@ +(define-package "transpose-frame" "20221109.2053" "Transpose windows arrangement in a frame" 'nil :commit "94c87794d53883a2358d13da264ad8dab9a52daa" :authors + '(("S. Irie")) + :maintainers + '(("S. Irie")) + :maintainer + '("S. Irie") + :keywords + '("window")) +;; Local Variables: +;; no-byte-compile: t +;; End: diff --git a/elpa/transpose-frame-20200307.2119/transpose-frame.el b/elpa/transpose-frame-20221109.2053/transpose-frame.el similarity index 98% rename from elpa/transpose-frame-20200307.2119/transpose-frame.el rename to elpa/transpose-frame-20221109.2053/transpose-frame.el index e847cce3..7e18f448 100644 --- a/elpa/transpose-frame-20200307.2119/transpose-frame.el +++ b/elpa/transpose-frame-20221109.2053/transpose-frame.el @@ -4,8 +4,6 @@ ;; Author: S. Irie ;; Keywords: window -;; Package-Version: 20200307.2119 -;; Package-Commit: 12e523d70ff78cc8868097b56120848befab5dbc ;; This program is free software. @@ -112,7 +110,6 @@ (window-margins tree) (window-fringes tree) (window-dedicated-p tree) - (window-redisplay-end-trigger tree) tree (eq tree (frame-selected-window frame))) (let* ((vertical (car tree)) @@ -147,7 +144,6 @@ (set-window-margins window (caar config) (cdr (pop config))) (apply 'set-window-fringes window (pop config)) (set-window-dedicated-p window (pop config)) - (set-window-redisplay-end-trigger window (pop config)) (let* ((orig-window (pop config)) (ol-func (lambda (ol) (when (eq (overlay-get ol 'window) orig-window)