mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
c4fdfabcc8
g -L frozen_string_literal ext/**/*.rb|xargs ruby -Ka -e'ARGV.each{|fn|puts
fn;open(fn,"r+"){|f|s=f.read.sub(/\A(#!.*\n)?(#.*coding.*\n)?/,"\\&#
frozen_string_literal: false\n");f.rewind;f.write s}}'
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@53143 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
43 lines
687 B
Ruby
43 lines
687 B
Ruby
# frozen_string_literal: false
|
|
# -*- ruby -*-
|
|
#
|
|
# tkencoding.rb
|
|
# written by ttate@jaist.ac.jp
|
|
|
|
class TclTkIp
|
|
alias __eval _eval
|
|
alias __invoke _invoke
|
|
private :__eval
|
|
private :__invoke
|
|
|
|
attr_accessor :encoding
|
|
|
|
def _eval(cmd)
|
|
if( @encoding )
|
|
_fromUTF8(__eval(_toUTF8(cmd,@encoding)),@encoding)
|
|
else
|
|
__eval(cmd)
|
|
end
|
|
end
|
|
|
|
def _invoke(*cmds)
|
|
if( @encoding )
|
|
cmds = cmds.collect{|cmd| _toUTF8(cmd,@encoding)}
|
|
_fromUTF8(__invoke(*cmds),@encoding)
|
|
else
|
|
__invoke(*cmds)
|
|
end
|
|
end
|
|
end
|
|
|
|
module Tk
|
|
INTERP = TkCore::INTERP
|
|
|
|
def encoding=(name)
|
|
INTERP.encoding = name
|
|
end
|
|
|
|
def encoding
|
|
INTERP.encoding
|
|
end
|
|
end
|