diff --git a/lisp/lpr.el b/lisp/lpr.el
index bab4e2e5a04..9e3c0f59f6f 100644
--- a/lisp/lpr.el
+++ b/lisp/lpr.el
@@ -115,7 +115,7 @@ See definition of `print-region-1' for calling conventions.")
 	    ;; Run a separate program to get page headers.
 	    (print-region-new-buffer start end)
 	    (call-process-region start end lpr-page-header-program
-				 t t lpr-page-header-options)
+				 t t lpr-page-header-switches)
 	    (setq start (point-min) end (point-max))))
       (apply (or print-region-function 'call-process-region)
 	     (nconc (list start end lpr-command