lisp/finder.el (finder-unload-function): New function.

lisp/ChangeLog

+2014-02-28  Juanma Barranquero  <lekktu@gmail.com>
+
+	* finder.el (finder-unload-function): New function.
+
 2014-02-28  Juanma Barranquero  <lekktu@gmail.com>
 
 	* dframe.el (dframe-detach):

lisp/finder.el

@@ -431,6 +431,12 @@ Delete the window and kill all Finder-related buffers."
   (let ((buf "*Finder*"))
     (and (get-buffer buf) (kill-buffer buf))))
 
+(defun finder-unload-function ()
+  "Unload the Finder library."
+  (with-demoted-errors (unload-feature 'finder-inf t))
+  ;; continue standard unloading
+  nil)
+
 
 (provide 'finder)