diff --git a/lisp/simple.el b/lisp/simple.el
index d8acf1f9c25..f02e2f478a9 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1576,7 +1576,7 @@ interact nicely with `interprogram-cut-function' and
 interaction; you may want to use them instead of manipulating the kill
 ring directly.")
 
-(defcustom kill-ring-max 30
+(defcustom kill-ring-max 60
   "*Maximum length of kill ring before oldest elements are thrown away."
   :type 'integer
   :group 'killing)