Skip to content

Commit

Permalink
Update transpose-frame
Browse files Browse the repository at this point in the history
  • Loading branch information
Wilfred committed Dec 26, 2023
1 parent 5323bea commit 1585eb1
Show file tree
Hide file tree
Showing 4 changed files with 31 additions and 27 deletions.
2 changes: 0 additions & 2 deletions elpa/transpose-frame-20200307.2119/transpose-frame-pkg.el

This file was deleted.

Original file line number Diff line number Diff line change
@@ -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
11 changes: 11 additions & 0 deletions elpa/transpose-frame-20221109.2053/transpose-frame-pkg.el
Original file line number Diff line number Diff line change
@@ -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:
Original file line number Diff line number Diff line change
Expand Up @@ -4,8 +4,6 @@

;; Author: S. Irie
;; Keywords: window
;; Package-Version: 20200307.2119
;; Package-Commit: 12e523d70ff78cc8868097b56120848befab5dbc

;; This program is free software.

Expand Down Expand Up @@ -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))
Expand Down Expand Up @@ -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)
Expand Down

0 comments on commit 1585eb1

Please sign in to comment.