Fix a couple of byte-compiler warnings.
authorSteve Youngs <steve@sxemacs.org>
Tue, 10 Jan 2012 14:18:05 +0000 (00:18 +1000)
committerSteve Youngs <steve@sxemacs.org>
Tue, 10 Jan 2012 14:18:05 +0000 (00:18 +1000)
* lisp/package-get.el (pui-bootstrap): Call #'pui-list-packages
via #'declare-fboundp to silence byte-compiler.
Also remove fake version hack.

* lisp/ffi/ffi-wand.el (liquid-rescale): Call
#'Wand:liquid-rescale via #'declare-fboundp to silence
byte-compiler.

Signed-off-by: Steve Youngs <steve@sxemacs.org>
lisp/ffi/ffi-wand.el
lisp/package-get.el

index 50af716..45819cb 100644 (file)
@@ -2491,7 +2491,8 @@ BLUR is float, 0.25 for insane pixels, > 2.0 for excessively smoth."
   (Wand:fit-size wand width height Wand-mode-scaler t))
 
 (define-Wand-operation liquid-rescale (wand width height)
-  (Wand:liquid-rescale wand width height 0.0 0.0))
+  (declare-fboundp
+   (Wand:liquid-rescale wand width height 0.0 0.0)))
 
 (define-Wand-operation posterize (wand levels &optional ditherp)
   (Wand:posterize-image wand levels ditherp))
index 1ea1f28..4b4a2db 100644 (file)
@@ -2,12 +2,12 @@
 
 ;; Copyright (C) 1998 by Pete Ware
 ;; Copyright (C) 2002 Ben Wing.
-;; Copyright (C) 2003, 2004 Steve Youngs
+;; Copyright (C) 2003 - 2012 Steve Youngs
 
 ;; Author: Pete Ware <ware@cis.ohio-state.edu>
 ;; Heavy-Modifications: Greg Klanderman <greg@alphatech.com>
 ;;                      Jan Vroonhof    <vroonhof@math.ethz.ch>
-;;                      Steve Youngs    <youngs@xemacs.org>
+;;                      Steve Youngs    <steve@sxemacs.org>
 ;; Keywords: internal
 
 ;; This file is part of SXEmacs.
@@ -1334,10 +1334,7 @@ tools, `pui-list-packages' etc."
        (delete-file (expand-file-name efs-pkg dldir))
        (error "MD5 mismatch, %s deleted" (expand-file-name efs-pkg dldir)))
       (when (y-or-n-p "Install more packages? ")
-       ;; Remove this ugly hack as soon as a SXEmacs-friendly EFS is in
-       ;; stable XE packages.  It is already in EFS upstream.
-       (let ((emacs-version "21.4 (patch 17) \"Jumbo Shrimp\" XEmacs Lucid"))
-         (pui-list-packages))))))
+       (declare-fboundp (pui-list-packages))))))
 
 (provide 'package-get)