0
@@ -14,51 +14,19 @@
0
 
0
 (class NSString
0
      
0
-     (- (id) markdownToHTML is (NuMarkdown convert:self))
0
+     (- (id) markdownToHTML is (NuMarkdown convert:self)))
0
      
0
-     ;; Convert a Textile-formatted string to HTML.
0
-     ;; Currently this goes out to Ruby.
0
-     ;; It assumes that <code>/usr/local/bin/redcloth</code> contains:
0
-     ;;
0
-     ;; <code>
0
-     ;; #!/usr/bin/ruby                          <br/>
0
-     ;; require 'rubygems'                       <br/>
0
-     ;; require 'RedCloth'                       <br/>
0
-     ;; puts RedCloth.new(STDIN.read).to_html
0
-     ;; </code>
0
-     (- (id) _UNUSED_textileToHTML is
0
-        (unless $textileCache (set $textileCache (dict)))
0
-        (unless (set results ($textileCache objectForKey:self))
0
-                (set input (NSPipe pipe))
0
-                (set output (NSPipe pipe))
0
-                (set task ((NSTask alloc) init))
0
-                (task set:(launchPath:"/usr/local/bin/redcloth"
0
-                           standardInput:input
0
-                           standardOutput:output))
0
-                ((input fileHandleForWriting) writeData:
0
-                 (self dataUsingEncoding:NSUTF8StringEncoding))
0
-                ((input fileHandleForWriting) closeFile)
0
-                (task launch)
0
-                (task waitUntilExit)
0
-                (set results ((NSString alloc)
0
-                              initWithData:((output fileHandleForReading) readDataToEndOfFile)
0
-                              encoding:NSUTF8StringEncoding))
0
-                ($textileCache setValue:results forKey:self))
0
-        results))
0
-
0
 (class NSDictionary
0
      
0
      (- (id) bodyAsHTML is
0
         (set body (self valueForKey:"body"))
0
         (case (self valueForKey:"format")
0
-              ("textile" (body textileToHTML))
0
               ("markdown" (body markdownToHTML))
0
               (else body)))
0
      
0
      (- (id) extendedAsHTML is
0
         (set extended (self valueForKey:"extended"))
0
         (case (self valueForKey:"format")
0
-              ("textile" (extended textileToHTML))
0
               ("markdown" (extended markdownToHTML))
0
               (else extended))))     
0