]> code.delx.au - gnu-emacs/blobdiff - lisp/url/url-dav.el
Update copyright year to 2015
[gnu-emacs] / lisp / url / url-dav.el
index 6adb2d978af18cf398c3fc2078ddcf58f50b0f5b..65747e93000e448577418766068b49ad53e5c470 100644 (file)
@@ -1,6 +1,6 @@
 ;;; url-dav.el --- WebDAV support
 
-;; Copyright (C) 2001, 2004-2014 Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2004-2015 Free Software Foundation, Inc.
 
 ;; Author: Bill Perry <wmperry@gnu.org>
 ;; Maintainer: emacs-devel@gnu.org
@@ -479,9 +479,9 @@ names (ie: DAV:resourcetype)."
                     "  <DAV:allprop/>")
                   depth nil namespaces))
 
-(defmacro url-dav-http-success-p (status)
+(define-inline url-dav-http-success-p (status)
   "Return whether STATUS was the result of a successful DAV request."
-  `(= (/ (or ,status 500) 100) 2))
+  (inline-quote (= (/ (or ,status 500) 100) 2)))
 
 \f
 ;;; Locking support