workgroups2 Changeset - a08e74fdc34e

Changeset - a08e74fdc34e

Parent rev.

Child rev.

[Not reviewed]

0 1 0

Sergey Pashinin - 11 years ago 2014-08-23 09:51:04
sergey@pashinin.com

Removed comments

1 file changed with 1 insertions and 6 deletions:

src/workgroups-wconfig.el

0 comments (0 inline, 0 general)

src/workgroups-wconfig.el

➞

Show inline comments

@@ @@ -111,9 +111,6 @@ WCONFIG's height." @@
     (wg-wconfig-wtree wconfig)
     (/ (float new-width)  (wg-wconfig-width wconfig))
     (/ (float new-height) (wg-wconfig-height wconfig)))))
 ;; (wg-wconfig-width (wg-current-wconfig))
 ;; (wg-wconfig-wtree (wg-current-wconfig))
 (defun wg-scale-wconfig-to-frame (wconfig)
   "Scale WCONFIG buffers to fit current frame size.
@@ @@ -122,13 +119,11 @@ Return a scaled copy of WCONFIG." @@
   (wg-scale-wconfigs-wtree wconfig
                            (frame-parameter nil 'width)
                            (frame-parameter nil 'height)))
 ;; (wg-scale-wconfig-to-frame (wg-current-wconfig))
 (defun wg-frame-resize-and-position (wconfig &optional frame)
   "Apply WCONFIG's size and position to a FRAME."
   (interactive)
   (unless frame
     (setq frame (selected-frame)))
   (unless frame (setq frame (selected-frame)))
   (let* ((params (wg-wconfig-parameters wconfig))
          fullscreen)
     (set-frame-parameter frame 'fullscreen (if (assoc 'fullscreen params)

0 comments (0 inline, 0 general)