[elpa] 61/119: fix deprecated file name in file example

[Eric Schulte]

eschulte pushed a commit to branch master
in repository elpa.

commit a14fbb66a95fa1b696b4ab668e79c73d3c838c7d
Author: Eric Schulte <address@hidden>
Date:   Sat Jan 4 10:46:56 2014 -0700

    fix deprecated file name in file example
---
 examples/3-file-server.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/examples/3-file-server.el b/examples/3-file-server.el
index 90336bd..e56a023 100644
--- a/examples/3-file-server.el
+++ b/examples/3-file-server.el
@@ -5,7 +5,7 @@
                (lambda (request)
                  (with-slots (process headers) request
                    (let ((path (substring (cdr (assoc :GET headers)) 1)))
-                     (if (ws-subdirectoryp docroot path)
+                     (if (ws-in-directory-p docroot path)
                          (ws-send-file process (expand-file-name path docroot))
                        (ws-send-404 process)))))))
    9003))