From d32bedfc52d8c615790703e9a7b481dfbcbf2f39 Mon Sep 17 00:00:00 2001 From: Joakim Verona Date: Thu, 12 Feb 2015 23:58:20 +0100 Subject: [PATCH] cl related changes --- lisp/xwidget.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/xwidget.el b/lisp/xwidget.el index 33f9a189f95..ce6d939dd3b 100644 --- a/lisp/xwidget.el +++ b/lisp/xwidget.el @@ -30,7 +30,7 @@ ;;; Code: -(eval-when-compile (require 'cl)) +(require 'cl-lib) (require 'reporter) (require 'bookmark) @@ -70,7 +70,6 @@ Optional argument ARGS usage depends on the xwidget." ;;; webkit support (require 'browse-url) (require 'image-mode);;for some image-mode alike functionality -(require 'cl-macs);;for flet ;;;###autoload (defun xwidget-webkit-browse-url (url &optional new-session) @@ -447,7 +446,7 @@ Argument H height." (defun xwidget-webkit-fit-width () "Adjust width of webkit to window width." (interactive) - (xwidget-webkit-adjust-size (- (caddr (window-inside-pixel-edges)) + (xwidget-webkit-adjust-size (- (nth 2 (window-inside-pixel-edges)) (car (window-inside-pixel-edges))) 1000)) -- 2.39.5