cl related changes

diff --git a/lisp/xwidget.el b/lisp/xwidget.el
index 33f9a189f9558ac29a47e18bbc359ce72444fa77..ce6d939dd3b932a81d8e319a4f8c1f1102a58cf0 100644 (file)
--- 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))