Index: runtime/doc/todo.txt
===================================================================
--- runtime/doc/todo.txt	(revision 495)
+++ runtime/doc/todo.txt	(working copy)
@@ -2901,7 +2901,7 @@
     use "aq" and "iq".  Use 'quotepairs' to define pairs of quotes, like
     'matchpairs'?
 8   Add text object for any kind of parens, also multi-byte ones.
-7   Add text object for current search pattern: "a/" and "i/".  Makes it
+7   Add text object for current search pattern: "an" and "in".  Makes it
     possible to turn text highlighted for 'hlsearch' into a Visual area.
 8   Add a way to make an ":omap" for a user-defined text object.
 8   Add "gp" and "gP" commands: insert text and make sure there is a single
Index: runtime/doc/motion.txt
===================================================================
--- runtime/doc/motion.txt	(revision 495)
+++ runtime/doc/motion.txt	(working copy)
@@ -628,6 +628,7 @@
 a"							*v_aquote* *aquote*
 a'							*v_a'* *a'*
 a`							*v_a`* *a`*
+a/							*v_a/* *a/*
 			"a quoted string".  Selects the text from the previous
 			quote until the next quote.  The 'quoteescape' option
 			is used to skip escaped quotes.
@@ -639,14 +640,18 @@
 			When used in Visual mode it is made characterwise.
 			Repeating this object in Visual mode another string is
 			included.  A count is currently not used.
+                        The a/ version is intended for Perlish /-delimited
+                        strings, such as regular expressions.
 
 i"							*v_iquote* *iquote*
 i'							*v_i'* *i'*
 i`							*v_i`* *i`*
+i/							*v_i/* *i/*
 			Like a", a' and a`, but exclude the quotes and
 			repeating won't extend the Visual selection.
 			Special case: With a count of 2 the quotes are
-			included, but no extra white space as with a"/a'/a`.
+			included, but no extra white space as with a", a', a`,
+                        and a/.
 
 When used after an operator:
 For non-block objects:
Index: src/normal.c
===================================================================
--- src/normal.c	(revision 495)
+++ src/normal.c	(working copy)
@@ -8800,6 +8800,7 @@
 	case '"': /* "a"" = a double quoted string */
 	case '\'': /* "a'" = a single quoted string */
 	case '`': /* "a`" = a backtick quoted string */
+	case '/': /* "a/" = a perlish /-delimited string */
 		flag = current_quote(cap->oap, cap->count1, include,
 								  cap->nchar);
 		break;