Rename the two example files

README

@@ -315,6 +315,15 @@ Check if a file has a size less than a specified limit.
 
 Example : `(=> alert file-less-than :path "/var/log/nginx.log" :limit 60)`
 
+curl-http-status
+----------------
+Do a HTTP request and return an error if the return code isn't 200. Requires curl.
+
+> Set the url to request.
+    :url "STRING"
+
+> Set the time to wait before aborting.
+    :timeout INTEGER
 
 The configuration file
 ======================

probes.lisp

@@ -113,3 +113,10 @@
    (if (> (getf params :limit) result)
        t
        (list nil result))))
+
+(create-probe
+ curl-http-status
+ (command-return-code
+  (list "curl" "-f"
+        (format nil "-m~a" (getf params :timeout 5))
+        (getf params :url))))