procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/calendar/cal-tex.el (cal-tex-weekly-common): Restore leading blank page.

Browse source
This commit is contained in:
Glenn Morris 2012-08-22 13:55:19 -04:00
parent 1d0f71d37a
commit 141562ffa6
2 changed files with 18 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2012-08-22 Glenn Morris <rgm@gnu.org>
* calendar/cal-tex.el (cal-tex-weekly-common):
Restore leading blank page.
2012-08-22 Le Wang <l26wang@gmail.com> (tiny change)
* misc.el (forward-to-word, backward-to-word): Activate or extend

20
lisp/calendar/cal-tex.el
View file

@ -1080,8 +1080,8 @@ shown are hard-coded to 8-12, 13-17."
(cal-tex-longday "weekend" "0.8in")
(insert cal-tex-lefthead)
(cal-tex-longday "leftday" "1.85in"))
(cal-tex-preamble "twoside,12pt")
(insert "\\textwidth 7in
(cal-tex-preamble "twoside,12pt")
(insert "\\textwidth 7in
\\textheight 10.5in
\\oddsidemargin 0in
\\evensidemargin 0in
@ -1090,13 +1090,19 @@ shown are hard-coded to 8-12, 13-17."
\\headsep 0.125in
\\footskip .125in
")
(insert cal-tex-righthead)
(cal-tex-longday "rightday" "2.75in")
(cal-tex-longday "weekend" "1.8in")
(insert cal-tex-lefthead)
(cal-tex-longday "leftday" "2.75in"))
(insert cal-tex-righthead)
(cal-tex-longday "rightday" "2.75in")
(cal-tex-longday "weekend" "1.8in")
(insert cal-tex-lefthead)
(cal-tex-longday "leftday" "2.75in"))
(cal-tex-b-document)
(cal-tex-cmd "\\pagestyle" "empty")
;; Let's assume this is something to with twopage documents.
;; It has the downside that we start with a blank page.
;; It doesn't make obvious sense when oddside and evenside margins
;; are the same (non-filofax), but consider the left and right
;; versions of various functions as applicable to even and odd pages.
(cal-tex-newpage)
(dotimes (i n)
(insert "\\lefthead")
(cal-tex-arg