diff --git a/README.org b/README.org
index eeb3e708..eb543765 100644
--- a/README.org
+++ b/README.org
@@ -3951,7 +3951,11 @@ Let's use pdf-tools for a lot better interaction with pdfs.
     "Print the pdf in as many copies as needed"
     (interactive)
     (let* ((copies (completing-read "How many copies: " '("1" "2" "3")))
-           (pdf-misc-print-program-args `("-o media=Letter" ,(format "-# %s" copies) "-o fitplot" "-o sides=two-sided-long-edge")))
+           (sides (completing-read "Print both sides or one? " '("two sided" "one sided")))
+           (pdf-misc-print-program-args `("-o media=Letter" ,(format "-# %s" copies) "-o fitplot"
+                                          ,(if (string= sides "two sided")
+                                              "-o sides=two-sided-long-edge"
+                                             ""))))
       (message "printing %s copies." copies)
       (pdf-misc-print-document (buffer-file-name))))
 
diff --git a/init.el b/init.el
index 204e97a4..57298ca1 100644
--- a/init.el
+++ b/init.el
@@ -2875,7 +2875,11 @@ targets."
     "Print the pdf in as many copies as needed"
     (interactive)
     (let* ((copies (completing-read "How many copies: " '("1" "2" "3")))
-           (pdf-misc-print-program-args `("-o media=Letter" ,(format "-# %s" copies) "-o fitplot" "-o sides=two-sided-long-edge")))
+           (sides (completing-read "Print both sides or one? " '("two sided" "one sided")))
+           (pdf-misc-print-program-args `("-o media=Letter" ,(format "-# %s" copies) "-o fitplot"
+                                          ,(if (string= sides "two sided")
+                                              "-o sides=two-sided-long-edge"
+                                             ""))))
       (message "printing %s copies." copies)
       (pdf-misc-print-document (buffer-file-name))))