# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1483134894 -7200
# Node ID 0ea3bcaae957164193500a94e576a6ad64e326f2
# Parent  f2f17e16ebdf0de5c4a9d64071217a396eaa5696
Allow duplication of consequent headwords to word around different
pronunciation depending on POS.

diff -r f2f17e16ebdf -r 0ea3bcaae957 contrib/gadict.el
--- a/contrib/gadict.el	Fri Dec 30 23:37:41 2016 +0200
+++ b/contrib/gadict.el	Fri Dec 30 23:54:54 2016 +0200
@@ -204,7 +204,7 @@
           (throw 'exit nil))
         (forward-line 2)
         (setq curr (buffer-substring-no-properties (point) (line-end-position)))
-        (unless (string< prev curr)
+        (when (string> prev curr)
           (error (format "%s < %s" curr prev)))
         (when (string= headword curr)
           (throw 'exit t))