Просмотр исходного кода

slang.tcl: update regex for site change

Will Storey 12 лет назад
Родитель
Сommit
ebbdad2b04
1 измененных файлов с 2 добавлено и 2 удалено
  1. 2 2
      slang.tcl

+ 2 - 2
slang.tcl

@@ -46,9 +46,9 @@ namespace eval ::ud {
 	variable url_random http://www.urbandictionary.com/random.php
 	variable url_random http://www.urbandictionary.com/random.php
 
 
 	# regex to find the word 
 	# regex to find the word 
-	variable word_regex {<div class='word'>\s*<a href[^>]*?>([^<]*?)</a>\s*</div>\s*<div class='definition'>}
+	variable word_regex {<div class='word'>\s*<a href[^>]*?>([^<]*?)</a>\s*</div>\s*<div class='meaning'>}
 	variable list_regex {<div class='box'.*? data-defid='[0-9]+'>.*?<div class='footer'>}
 	variable list_regex {<div class='box'.*? data-defid='[0-9]+'>.*?<div class='footer'>}
-	variable def_regex {<div class='box'.*? data-defid='([0-9]+)'>.*?<div class='definition'>(.*?)</div>}
+	variable def_regex {<div class='box'.*? data-defid='([0-9]+)'>.*?<div class='meaning'>(.*?)</div>}
 
 
 	setudef flag ud
 	setudef flag ud
 	bind pub -|- $::ud::trigger ::ud::handler
 	bind pub -|- $::ud::trigger ::ud::handler