From 8b26b9888e049d235b9d7d7837be680ea5a9abd4 Mon Sep 17 00:00:00 2001
From: "Mirar (Pontus Hagland)" <pike@sort.mirar.org>
Date: Mon, 3 Nov 1997 03:06:19 +0100
Subject: [PATCH] using new GIF system
Rev: src/modules/Image/illustration.pike:1.3
Rev: src/modules/Image/mkdoc.pike:1.14
---
src/modules/Image/illustration.pike | 4 ++--
src/modules/Image/mkdoc.pike | 8 +++++++-
2 files changed, 9 insertions(+), 3 deletions(-)
diff --git a/src/modules/Image/illustration.pike b/src/modules/Image/illustration.pike
index 6ff598e3a4..7e8e3f45c4 100644
--- a/src/modules/Image/illustration.pike
+++ b/src/modules/Image/illustration.pike
@@ -1,4 +1,4 @@
-/* $Id: illustration.pike,v 1.2 1997/10/29 02:57:04 mirar Exp $ */
+/* $Id: illustration.pike,v 1.3 1997/11/03 02:06:18 mirar Exp $ */
import Image;
import Stdio;
@@ -27,7 +27,7 @@ string doit(string name,mapping has,object f,string src)
if (has[s]) return has[s];
- write_file("doc/"+name,o->togif());
+ write_file("doc/"+name,Image.GIF.encode(o));
f->write(
"<a name="+name+">"
diff --git a/src/modules/Image/mkdoc.pike b/src/modules/Image/mkdoc.pike
index 907fc0afc8..118716859b 100644
--- a/src/modules/Image/mkdoc.pike
+++ b/src/modules/Image/mkdoc.pike
@@ -1,4 +1,4 @@
-/* $Id: mkdoc.pike,v 1.13 1997/11/02 03:43:32 mirar Exp $ */
+/* $Id: mkdoc.pike,v 1.14 1997/11/03 02:06:19 mirar Exp $ */
import Stdio;
import Array;
@@ -167,7 +167,10 @@ string make_nice_reference(string refto,string my_prefix)
case 3: link=refto; break;
}
+ write(link+" -> ");
+
s=0; t=0;
+ sscanf(link,"%s.%s",link,s);
sscanf(link,"%s.%s.%s",link,s,t);
if (s) link+="."+s;
if (t) link=link+".html#"+t;
@@ -176,6 +179,9 @@ string make_nice_reference(string refto,string my_prefix)
link=replace(link,"::",".html#");
else
link+=".html";
+
+ write(link+"\n");
+
return "<tt><a href="+urlify(link)+">"+refto+"</a></tt>";
}
--
GitLab