Branch: Tag:

1997-11-10

1997-11-10 14:19:58 by Mirar (Pontus Hagland) <pike@sort.mirar.org>

doc update - wmml working

Rev: src/modules/Image/doc-footer:1.3
Rev: src/modules/Image/encodings/pnm.c:1.3
Rev: src/modules/Image/image.c:1.59
Rev: src/modules/Image/mkwmml.pike:1.4
Rev: src/modules/Image/x.c:1.15
Rev: tutorial/Image.wmml:1.4

1: - /* $Id: mkwmml.pike,v 1.3 1997/11/10 13:30:02 mirar Exp $ */ + /* $Id: mkwmml.pike,v 1.4 1997/11/10 14:19:56 mirar Exp $ */      import Stdio;   import Array;
184:   string make_nice_reference(string what,string prefix)   {    string q; -  if (search(what,".")==-1 && +  if (what==prefix[strlen(prefix)-strlen(what)-2..strlen(prefix)-3]) +  { +  q=prefix[0..strlen(prefix)-3]; +  } +  else if (what==prefix[strlen(prefix)-strlen(what)-1..strlen(prefix)-2]) +  { +  q=prefix[0..strlen(prefix)-2]; +  } +  else if (search(what,".")==-1 &&    search(what,"->")==-1 && -  !parse[what] && -  what!=prefix[strlen(prefix)-strlen(what)-2..strlen(prefix)-3] && -  what!=prefix[strlen(prefix)-strlen(what)-1..strlen(prefix)-2]) +  !parse[what])    {    q=prefix+what;    }