Summary

bug in dict egg

Metadata

• Id: 7f5d88e0e86836623befef38a93bf8ae9150f165
• Trac id: 676
• Type: defect
• Reporter: felix
• Owner: certainty
• Cc:
• Status: closed
• Component: extensions
• Estimated difficulty:
• Resolution: fixed
• Priority: major
• Milestone:
• Version: 4.7.x
• Changetime: 2011-10-22 10:03:27 UTC
• Created: 2011-08-31 12:42:32 UTC
• Keywords: dict

Description

There seems to be a typo in dict.scm:

  (define (parse-status-151 input)
     (let ((ws (string-index input #\space)))
       (unless ws (complain "Malformed status 151 response. Expected `word`" input))
       (let ((word (string-trim-both (string-take input ws) #\"))
             (ws2 (string-index input #\space (+ ws 1))))
         ;;      vv  should be ws2?
         (unless ws (complain "Malformed status 151 response. Expected `databasename`"  input))
         (let ((db (string-trim-both (string-take (string-drop input (+ ws 1)) (- ws2 (+ 1 ws))) #\"\
 ))
               (descr (string-trim-both (string-trim-both (string-drop input (+ 1 ws2)) #\space) #\"\
 )))
           (list word db descr)))))

Changes and comments

[2011-08-31 12:43:02 UTC] felix changed description

[2011-10-22 10:03:27 UTC] certainty changed status from new to closed

[2011-10-22 10:03:27 UTC] certainty set resolution to fixed

[2011-10-22 10:03:27 UTC] certainty wrote:

Thanks felix. I've fixed it. The new version 2.7 is available.