[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: gnu: fastcap: Fix 'fix-doc phase.
From: |
Federico Beffa |
Subject: |
01/01: gnu: fastcap: Fix 'fix-doc phase. |
Date: |
Sat, 17 Oct 2015 16:15:58 +0000 |
beffa pushed a commit to branch master
in repository guix.
commit 1f7ffd6ff7eef41fb1bc29fb23a70c5feb6ea2c5
Author: Federico Beffa <address@hidden>
Date: Sat Oct 17 18:11:49 2015 +0200
gnu: fastcap: Fix 'fix-doc phase.
* gnu/packages/engineering.scm (fastcap): Adapt documentation generation to
change in TeXLive 2015.
---
gnu/packages/engineering.scm | 14 ++++++++++++--
1 files changed, 12 insertions(+), 2 deletions(-)
diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm
index 54e43ef..3738596 100644
--- a/gnu/packages/engineering.scm
+++ b/gnu/packages/engineering.scm
@@ -265,8 +265,18 @@ optimizer; and it can produce photorealistic and design
review images.")
(("\\\\special\\{psfile=([^,]*),.*scale=([#0-9.]*).*\\}"
all file scale)
(string-append "\\includegraphics[scale=" scale "]{"
- file "}")))
- (substitute* '("doc/mtt.tex" "doc/tcad.tex")
+ file "}"))
+
(("\\\\psfig\\{figure=([^,]*),.*width=([#0-9.]*in).*\\}"
+ all file width)
+ (string-append "\\includegraphics[width=" width "]{"
+ file "}"))
+
(("\\\\psfig\\{figure=([^,]*),.*height=([#0-9.]*in).*\\}"
+ all file height)
+ (string-append "\\includegraphics[height=" height
"]{"
+ file "}"))
+ (("\\\\psfig\\{figure=([^,]*)\\}" all file)
+ (string-append "\\includegraphics{" file "}")))
+ (substitute* '("doc/mtt.tex" "doc/tcad.tex"
"doc/ug.tex")
(("^\\\\documentstyle\\[(.*)\\]\\{(.*)\\}"
all options class)
(string-append "\\documentclass[" options "]{"