From 554ef99207731fb5c3d26e176b04c6c910996bc1 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Tue, 12 Jan 2016 23:42:11 +0100 Subject: no more lineNumbers --- provider/posts/beuteltier-2.lhs | 2 +- provider/posts/beuteltier-3.md | 2 +- provider/posts/hakyll.md | 8 ++++---- provider/posts/pwutil.md | 6 +++--- provider/posts/tex-support.md | 6 +++--- 5 files changed, 12 insertions(+), 12 deletions(-) diff --git a/provider/posts/beuteltier-2.lhs b/provider/posts/beuteltier-2.lhs index d5e0294..137b8de 100644 --- a/provider/posts/beuteltier-2.lhs +++ b/provider/posts/beuteltier-2.lhs @@ -68,7 +68,7 @@ mostly of the canonical invocations of Quite often we find ourselves in the position that we want to alter some small parts of a complicated structure. We would therefore like to write the following: -~~~ {.haskell .numberLines} +~~~ {.haskell} updateFoo :: Foo -> Monad Foo updateFoo x = alter x $ do bar <~ (constructNewBar :: Monad Bar) diff --git a/provider/posts/beuteltier-3.md b/provider/posts/beuteltier-3.md index 79e105a..9b699c1 100644 --- a/provider/posts/beuteltier-3.md +++ b/provider/posts/beuteltier-3.md @@ -8,7 +8,7 @@ I commited a change to `beuteltier/Beuteltier/Types/Util.hs` ("[…] Hashable up replaced the `Hashable` instances for `Object` and `MetaData` with a single, better optimized function: -~~~ {.haskell .numberLines} +~~~ {.haskell} objHash :: Applicative f => ObjectGen f -> f Int -- ^ Two 'ObjectGen's hashes are a first indication of whether they are 'Equivalent' objHash o = fmap hash $ (,) <$> (Set.toList . (^. mTags) <$> o ^. oMeta) <*> (Map.keys <$> o ^. oContent) diff --git a/provider/posts/hakyll.md b/provider/posts/hakyll.md index 8e8b1fc..910edcb 100644 --- a/provider/posts/hakyll.md +++ b/provider/posts/hakyll.md @@ -34,7 +34,7 @@ function to add new tags to an already existing [Tags](http://hackage.haskell.org/package/hakyll-4.7.2.2/docs/Hakyll-Web-Tags.html#t:Tags) structure and used it to add my desired pseudo-tag. -~~~ {.haskell .numberLines} +~~~ {.haskell} main = hakyllWith config $ do … tags <- buildTags "posts/*" tagTranslation' >>= addTag "All Posts" "posts/*" @@ -61,7 +61,7 @@ A trick I used to implement the desired behaviour of replacing old posts with the corresponding template to only print "…". Trimming the list of posts is straightforward. -~~~ {.haskell .numberLines} +~~~ {.haskell} renderTag :: String -- ^ Tag name -> Tags -> Compiler (Item String) @@ -101,7 +101,7 @@ I was stumped for a while when my templates wouldn´t This was easily rectified by realising, that even templates need (of course) a declaration of how to compile them: -~~~ {.haskell .numberLines} +~~~ {.haskell} main = hakyllWith config $ do match "templates/*" $ compile templateCompiler … @@ -123,7 +123,7 @@ twice. So I did: -~~~ {.haskell .numberLines} +~~~ {.haskell} main = hakyllWith config $ do tags <- buildTags "posts/*" tagTranslation' … let diff --git a/provider/posts/pwutil.md b/provider/posts/pwutil.md index a4b3757..63a660d 100644 --- a/provider/posts/pwutil.md +++ b/provider/posts/pwutil.md @@ -53,7 +53,7 @@ pwutil is a [nix](https://nixos.org/nix) expression allowing easy installation using the nix package manager. A `~/.nixpkgs/config.nix` allowing one to do so might look thus: -~~~ {.numberLines} +~~~ { packageOverrides = pkgs: { pwutil = pkgs.callPackage /path/to/pwutil.nix {}; @@ -76,7 +76,7 @@ Introducing `PW` (much as [xmonad](https://xmonad.org) did with `X`) is an easy `BackStore` is our (new and improved) way of encapsulating store access in a totally customisable way—`plain`, which is essential `readFile` and `writeFile` as provided by `ByteString`, is provided for convenience in `Util.hs`. `PWConfig` most importantly contains a definition of generators (called by passing `--gen-…` to `pwadd`). -~~~ {#Types.hs .haskell .numberLines} +~~~ {#Types.hs .haskell} module PWUtil.Types ( PW(..), BackStore(..), @@ -109,7 +109,7 @@ type Generator = [String] -> PW Value is, in a [xmonad](http://xmonad.org) kind of way, the configuration file—the shipped default is reproduced below as a template for custom configs. -~~~ {#pwutil.hs .haskell .numberLines} +~~~ {#pwutil.hs .haskell} import PWUtil import System.FilePath (()) diff --git a/provider/posts/tex-support.md b/provider/posts/tex-support.md index 0beade1..7f43eb6 100644 --- a/provider/posts/tex-support.md +++ b/provider/posts/tex-support.md @@ -29,7 +29,7 @@ $\text{tan}(\phi) = \frac{\text{sin}(\phi)}{\text{cos}(\phi)}$ Theorem environments are written using [pandoc](http://pandoc.org)s support for block environments: -~~~ {.markdown .numberLines} +~~~ {.markdown}
Formulae are rendered with $\text{\LaTeX}$ and included as [SVG](https://en.wikipedia.org/wiki/SVG). @@ -56,7 +56,7 @@ $\text{\LaTeX}$ support is, however, lacking as I opted not to patch pandoc ([ma The actual compilation happens in a new module I named `Math.hs`. We´ll start there. For your reading pleasure I added some comments to the reproduction below. -~~~ {.haskell .numberLines} +~~~ {.haskell} module Math ( compileMath ) where @@ -138,7 +138,7 @@ extractAlignment = fromMaybe "0pt" . extract . (=~ "depth=([^\\s]+)") -- One of The more trick part proved to be integration into the framework as provided by [Hakyll](http://jaspervdj.be/hakyll/). -~~~ {.haskell .numberLines} +~~~ {.haskell} … import qualified Crypto.Hash.SHA256 as SHA256 (hash) -- cgit v1.2.3