SHARE
TWEET

incith-horoscope tls diff

plat_ Sep 21st, 2017 (edited) 40 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --- incith-horoscope.tcl        2013-05-28 07:09:52.000000000 -0400
  2. +++ incith-horoscope-tls.tcl    2017-09-21 23:03:40.153410973 -0400
  3. @@ -42,6 +42,7 @@
  4.  # http://incith.com ~ incith@gmail.com ~ irc.freenode.net/#incith     #
  5.  #---------------------------------------------------------------------#
  6.  package require http 2.3
  7. +package require tls
  8.  setudef flag horoscope
  9.  
  10.  namespace eval incith::horoscope {
  11. @@ -175,10 +176,10 @@
  12.        return
  13.      }
  14.      # valid, set our url
  15. -    set input(url) "http://www.astrology.com/horoscopes/daily-horoscope.rss"
  16. +    set input(url) "https://www.astrology.com/horoscopes/daily-horoscope.rss"
  17.      foreach sign [split ${incith::horoscope::en_chinese} " "] {
  18.        if {$input(query) == $sign} {
  19. -        set input(url) "http://www.astrology.com/horoscopes/daily-chinese.rss"
  20. +        set input(url) "https://www.astrology.com/horoscopes/daily-chinese.rss"
  21.          break
  22.        }
  23.      }
  24. @@ -209,6 +210,7 @@
  25.        ::http::config -useragent $ua
  26.      }
  27.      # retrieve the html
  28. +    http::register https 443 [list ::tls::socket -tls1 1]
  29.      if {$incith::horoscope::callback >= 1} {
  30.        catch {set token [::http::geturl "$input(url)" -command incith::horoscope::httpCommand -timeout $timeout]} output(status)
  31.      } else {
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top