diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index b0923ffc3b..1cb1e6a787 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,9 @@
+2012-11-08  Yao Qi  <yao@codesourcery.com>
+
+	PR gdb/14777.
+	* source.c (_initialize_source): Call add_com_alias to abbreviate
+	'forward-search' as 'fo'.
+
 2012-11-07  Pedro Alves  <palves@redhat.com>
 
 	* arm-tdep.c: Make defs.h be the first include.
diff --git a/gdb/doc/ChangeLog b/gdb/doc/ChangeLog
index 50e9c8c12d..fd776bf167 100644
--- a/gdb/doc/ChangeLog
+++ b/gdb/doc/ChangeLog
@@ -1,3 +1,7 @@
+2012-11-08  Yao Qi  <yao@codesourcery.com>
+
+	* gdb.texinfo (Search): Add kindex for 'fo'.
+
 2012-11-05  Tom Tromey  <tromey@redhat.com>
 
 	PR python/14802:
diff --git a/gdb/doc/gdb.texinfo b/gdb/doc/gdb.texinfo
index c2c77454a1..c7777e6455 100644
--- a/gdb/doc/gdb.texinfo
+++ b/gdb/doc/gdb.texinfo
@@ -6955,6 +6955,7 @@ regular expression.
 @table @code
 @kindex search
 @kindex forward-search
+@kindex fo @r{(@code{forward-search})}
 @item forward-search @var{regexp}
 @itemx search @var{regexp}
 The command @samp{forward-search @var{regexp}} checks each line,
diff --git a/gdb/source.c b/gdb/source.c
index bd11c63192..307fecc402 100644
--- a/gdb/source.c
+++ b/gdb/source.c
@@ -1953,6 +1953,7 @@ The address is also stored as the value of \"$_\"."));
 Search for regular expression (see regex(3)) from last line listed.\n\
 The matching line number is also stored as the value of \"$_\"."));
   add_com_alias ("search", "forward-search", class_files, 0);
+  add_com_alias ("fo", "forward-search", class_files, 1);
 
   add_com ("reverse-search", class_files, reverse_search_command, _("\
 Search backward for regular expression (see regex(3)) from last line listed.\n\