Bug #8000 » 0001-Fix-tk-crash-with-Tk-8.6.1-on-Ubuntu.patch
| ext/tk/extconf.rb | ||
|---|---|---|
|
%w[8.5 8.4] # At present, Tcl/Tk8.6 is not supported.
|
||
|
TkLib_Config['unsupported_versions'] =
|
||
|
%w[8.8 8.7 8.6] # At present, Tcl/Tk8.6 is not supported.
|
||
|
%w[8.8 8.7] # At present, Tcl/Tk8.7 is not supported.
|
||
|
TkLib_Config['major_nums'] = '87'
|
||
| ... | ... | |
|
config_dir << RbConfig::CONFIG['libdir']
|
||
|
['/usr/lib/x86_64-linux-gnu'].each do |dir|
|
||
|
config_dir << dir if File.exist?(dir)
|
||
|
end
|
||
|
((maybe_64bit?)? ['lib64', 'lib']: ['lib']).each{|dir|
|
||
|
config_dir.concat [
|
||
|
File.join(RbConfig::CONFIG['exec_prefix'], dir),
|
||
| ext/tk/tcltklib.c | ||
|---|---|---|
|
return;
|
||
|
}
|
||
|
if (orig_info.isNativeObjectProc) {
|
||
|
Tcl_CreateObjCommand(interp, "__orig_namespace_command__",
|
||
|
orig_info.objProc, orig_info.objClientData,
|
||
|
orig_info.deleteProc);
|
||
|
} else {
|
||
|
Tcl_CreateCommand(interp, "__orig_namespace_command__",
|
||
|
orig_info.proc, orig_info.clientData,
|
||
|
orig_info.deleteProc);
|
||
|
}
|
||
|
Tcl_Eval(interp, "rename namespace __orig_namespace_command__");
|
||
|
Tcl_CreateObjCommand(interp, "namespace", ip_rbNamespaceObjCmd,
|
||
|
(ClientData) 0, (Tcl_CmdDeleteProc *)NULL);
|
||