2 files changed, 5 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 21eaa4c15d3..2d4ef5611bb 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,4 +1,6 @@
-2010-09-05  Stefan Monnier  <monnier@iro.umontreal.ca>
+2010-09-05  Alexander Klimov  <alserkli@inbox.ru>  (tiny change)
+
+        * files.el (directory-abbrev-alist): Use \` as default regexp.
 
         * emacs-lisp/rx.el (rx-any): Don't explode ranges that end in special
         chars like - or ] (bug#6984).
diff --git a/lisp/files.el b/lisp/files.el
index f6564768ae7..02f5f8fdacf 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -66,9 +66,9 @@ Use this feature when you have directories which you normally refer to
 via absolute symbolic links.  Make TO the name of the link, and FROM
 the name it is linked to."
   :type '(repeat (cons :format "%v"
-                       :value ("" . "")
+                       :value ("\\`" . "")
                        (regexp :tag "From")
-                       (regexp :tag "To")))
+                       (string :tag "To")))
   :group 'abbrev
   :group 'find-file)