OpenEuphoria

Re: RSS reader

• Posted by jeremy (admin) Mar 31, 2010
• 963 views

Something must have changed in the Creole library or some other condition took place causing this to happen, but Creole was printing a ton of "Unresolved link" warnings at the top of the RSS feed, thus throwing off all the HTTP headers sent back to the web server, causing the 500 error.

I commented out the printf statement giving that warning message, but it may just be avoiding the issue.

Derek? It was on line 3975 of the creole.e that runs the forum, the code looks like:

    for i = 1 to length(vUnresolved) do 
      if vVerbose then 
        printf(1, "Local Link #%5d of %5d (%s)\n", {i,length(vUnresolved),vUnresolved[i][2]}) 
      end if 
      lIdx = find_bookmark(vUnresolved[i][1], vUnresolved[i][2], vUnresolved[i][3], vUnresolved[i][4]) 
      if lIdx = 0 then 
        lPluginResult = Generate_Final(InternalLink,{"unresolved", vUnresolved[i][2]}) 
        --printf(1, "Unresolved link='%s' display='%s' context='%s'\n", vUnresolved[i][1..3]) 
      else 
 
        sequence lFileName 
        if length(vBookMarks[lIdx][5]) != 0 then 
          lFileName = filebase(vBookMarks[lIdx][5]) 
        else 
          lFileName = filebase(vBookMarks[lIdx][4]) 
        end if 
        lPluginResult = Generate_Final(QualifiedLink, {lFileName, 
                          vBookMarks[lIdx][3], vUnresolved[i][2]}) 
      end if 
 
      lPos = match_from({TAG_UNRESOLVED, i}, lText, lFrom) 
      if lPos > 0 then 
        lText = lText[1 .. lPos - 1] & lPluginResult & lText[lPos + 2 .. $] 
        lFrom += length(lPluginResult) - 2 
      end if 
    end for 

Any thoughts?

Jeremy