Landscape option added to base class

classes/base.lua

@@ -79,6 +79,7 @@ end
 
 function class:setOptions (options)
   options = options or {}
+  self.options.landscape = options.landscape or false
   options.papersize = options.papersize or "a4"
   for option, value in pairs(options) do
     self.options[option] = value
@@ -101,10 +102,17 @@ function class:declareOptions ()
     end
     return self._name
   end)
+  self:declareOption("landscape", function(_, landscape)
+    if landscape then
+      self.landscape = landscape
+    end
+    SILE.documentState.landscape = self.landscape
+    return self.landscape
+  end)
   self:declareOption("papersize", function (_, size)
     if size then
       self.papersize = size
-      SILE.documentState.paperSize = SILE.papersize(size)
+      SILE.documentState.paperSize = SILE.papersize(size, self.options.landscape)
       SILE.documentState.orgPaperSize = SILE.documentState.paperSize
       SILE.newFrame({
         id = "page",

core/papersize.lua

@@ -63,13 +63,16 @@ local papersize = {
 }
 
 setmetatable(papersize, {
-    __call = function (self, size)
+    __call = function (self, size, landscape)
       local _, _, x, y = string.find(size, "(.+)%s+x%s+(.+)")
       if x and y then
         return { SILE.measurement(x):tonumber(), SILE.measurement(y):tonumber() }
       else
         size = string.lower(size:gsub("[-%s]+", ""))
         if self[size] then
+          if SU.boolean(landscape) then
+            self[size][1], self[size][2] = self[size][2], self[size][1]
+          end
           return self[size]
         end
       end

documentation/c03-input.sil

@@ -61,6 +61,14 @@ Once some of the basic document properties have been set up using these fixed si
 For example, once the paper size is set, percentage of page width (\code{\%pw}) and height(\code{\%ph}) become valid units.
 In Chapter 4 we will meet more of these relative units, and in Chapter 7 we will meet some other ways of specifying lengths to make them stretchable or shrinkable.
 
+\subsection{Setting orientation as landscape}
+
+The orientation of the page is defined as "portrait" by default, but if you want to set it as landscape there is an option for that:
+
+\begin[type=autodoc:codeblock]{raw}
+\begin[landscape=true]{document}
+\end{raw}
+
 \section{Ordinary text}
 
 On the whole, ordinary text isn’t particularly interesting—it’s just typeset.

tests/landscape.expected

@@ -0,0 +1,8 @@
+Set paper size 	841.8897729	595.275597
+Begin page
+Mx 	418.5987
+My 	553.7327
+Set font 	Gentium Plus;10;400;;normal;;;LTR
+T	20 w=4.6924	(1)
+End page
+Finish

tests/landscape.sil

@@ -0,0 +1,2 @@
+\begin[landscape=true]{document}
+\end{document}