diff --git a/lisp/mouse-sel.el b/lisp/mouse-sel.el
index 87a75a54c6f..f806395489d 100644
--- a/lisp/mouse-sel.el
+++ b/lisp/mouse-sel.el
@@ -198,7 +198,7 @@ If nil, point will always be placed at the beginning of the region."
 
 (defvar mouse-sel-original-bindings nil)
 (defvar mouse-sel-original-interprogram-cut-function nil)
-(defvar mouse-sel-original-interprogram-cut-function nil)
+(defvar mouse-sel-original-interprogram-paste-function nil)
 
 ;;;###autoload
 (define-minor-mode mouse-sel-mode