mercurial.el: don't raise an error from find-file-hook
find-file() shouldn't fail even if unreadable .hg directory is exists.
Not enabling hg-mode is sufficient for that senario.
--- a/contrib/mercurial.el Sat May 05 15:50:40 2007 +0900
+++ b/contrib/mercurial.el Sat May 05 15:56:49 2007 +0900
@@ -750,8 +750,9 @@
(run-hooks 'hg-mode-hook))
(defun hg-find-file-hook ()
- (when (hg-mode-line)
- (hg-mode)))
+ (ignore-errors
+ (when (hg-mode-line)
+ (hg-mode))))
(add-hook 'find-file-hooks 'hg-find-file-hook)