diff options
| -rw-r--r-- | core/.buffer.luadoc | 6 | ||||
| -rw-r--r-- | core/file_io.lua | 161 | ||||
| -rw-r--r-- | core/lfs_ext.lua | 17 | ||||
| -rw-r--r-- | core/ui.lua | 15 | ||||
| -rw-r--r-- | doc/14_Appendix.md | 14 | ||||
| -rw-r--r-- | modules/cpp/init.lua | 3 | ||||
| -rw-r--r-- | modules/lua/init.lua | 3 | ||||
| -rw-r--r-- | modules/textadept/adeptsense.lua | 4 | ||||
| -rw-r--r-- | modules/textadept/find.lua | 23 | ||||
| -rw-r--r-- | modules/textadept/run.lua | 4 | ||||
| -rw-r--r-- | modules/textadept/session.lua | 20 |
11 files changed, 123 insertions, 147 deletions
diff --git a/core/.buffer.luadoc b/core/.buffer.luadoc index 1c359304..ac94b191 100644 --- a/core/.buffer.luadoc +++ b/core/.buffer.luadoc @@ -277,11 +277,7 @@ -- The amount of pixel padding below line text. -- The default is `0`. -- @field filename (string) --- The UTF-8-encoded absolute path to the file associated with the buffer. --- Use [`string.iconv()`][] and [`_G._CHARSET`][] for charset conversions. --- --- [`string.iconv()`]: string.html#iconv --- [`_G._CHARSET`]: _G.html#_CHARSET +-- The absolute path to the file associated with the buffer. -- @field first_visible_line (number) -- The line number of the line at the top of the view, starting from zero. -- @field fold_expanded (table) diff --git a/core/file_io.lua b/core/file_io.lua index 0a2d1963..72584675 100644 --- a/core/file_io.lua +++ b/core/file_io.lua @@ -3,55 +3,30 @@ --[[ This comment is for LuaDoc. --- -- Extends Lua's `io` library with Textadept functions for working with files. --- --- ## Working with UTF-8 --- --- Textadept encodes all of its filenames, like [`buffer.filename`][], in UTF-8. --- If you try to use Lua to access the file associated with such a filename, you --- may not get the right file if your filesystem's encoding is not UTF-8 (e.g. --- Windows). --- --- -- May not work on non-UTF-8 filesystems. --- local f = io.open(buffer.filename, 'rb') --- --- You need to convert the filename to the filesystem's encoding using --- [`string.iconv()`][] along with [`_CHARSET`][]: --- --- local name = string.iconv(buffer.filename, --- _CHARSET, 'UTF-8') --- local f = io.open(name, 'rb') --- --- Textadept automatically performs filename conversions for you when opening --- and saving files through dialogs. You only need to do manual conversions when --- working with the filesystem directly from Lua. --- --- [`buffer.filename`]: buffer.html#filename --- [`string.iconv()`]: string.html#iconv --- [`_CHARSET`]: _G.html#_CHARSET -- @field _G.events.FILE_OPENED (string) -- Emitted when opening a file in a new buffer. -- Emitted by [`open_file()`](#open_file). -- Arguments: -- --- * _`filename`_: The UTF-8-encoded filename. +-- * _`filename`_: The filename opened. -- @field _G.events.FILE_BEFORE_SAVE (string) -- Emitted right before saving a file to disk. -- Emitted by [`io.save_file()`](#save_file). -- Arguments: -- --- * _`filename`_: The UTF-8-encoded filename. +-- * _`filename`_: The filename being saved. -- @field _G.events.FILE_AFTER_SAVE (string) -- Emitted right after saving a file to disk. -- Emitted by [`io.save_file()`](#save_file). -- Arguments: -- --- * _`filename`_: The UTF-8-encoded filename. +-- * _`filename`_: The filename being saved. -- @field _G.events.FILE_SAVED_AS (string) -- Emitted after saving a file under a different filename. -- Emitted by [`io.save_file_as()`](#save_file_as). -- Arguments: -- --- * _`filename`_: The UTF-8-encoded filename. +-- * _`filename`_: The new filename. -- @field SNAPOPEN_MAX (number) -- The maximum number of files to list in the snapopen dialog. -- The default value is `1000`. @@ -116,28 +91,28 @@ io.boms = { io.encodings = {'UTF-8', 'ASCII', 'ISO-8859-1', 'MacRoman'} --- --- Opens *utf8_filenames*, a "\n" delimited string of UTF-8-encoded filenames, --- or user-selected files. +-- Opens *filenames*, a "\n" delimited string of filenames, or user-selected +-- files. -- Emits a `FILE_OPENED` event. --- @param utf8_filenames Optional string list of UTF-8-encoded filenames to --- open. If `nil`, the user is prompted with a fileselect dialog. +-- @param filenames Optional string list filenames to open. If `nil`, the user +-- is prompted with a fileselect dialog. -- @see _G.events -- @name open_file -function io.open_file(utf8_filenames) - utf8_filenames = utf8_filenames or - ui.dialog('fileselect', - '--title', _L['Open'], - '--select-multiple', - '--with-directory', - (buffer.filename or ''):match('.+[/\\]') or '') - for utf8_filename in utf8_filenames:gmatch('[^\n]+') do - utf8_filename = utf8_filename:gsub('^file://', '') - if WIN32 then utf8_filename = utf8_filename:gsub('/', '\\') end +function io.open_file(filenames) + filenames = filenames or + ui.dialog('fileselect', + '--title', _L['Open'], + '--select-multiple', + '--with-directory', + (buffer.filename or ''):match('^.+[/\\]') or '') + for filename in filenames:gmatch('[^\n]+') do + filename = filename:gsub('^file://', '') + if WIN32 then filename = filename:gsub('/', '\\') end for i, buffer in ipairs(_BUFFERS) do - if utf8_filename == buffer.filename then view:goto_buffer(i) return end + if filename == buffer.filename then view:goto_buffer(i) return end end - local filename, text = utf8_filename:iconv(_CHARSET, 'UTF-8'), '' + local text = '' local f, err = io.open(filename, 'rb') if f then text = f:read('*all') @@ -175,15 +150,15 @@ function io.open_file(utf8_filenames) buffer:goto_pos(0) buffer:empty_undo_buffer() buffer.mod_time = lfs.attributes(filename, 'modification') or os.time() - buffer.filename = utf8_filename + buffer.filename = filename buffer:set_save_point() - events.emit(events.FILE_OPENED, utf8_filename) + events.emit(events.FILE_OPENED, filename) -- Add file to recent files list, eliminating duplicates. for i, file in ipairs(io.recent_files) do - if file == utf8_filename then table.remove(io.recent_files, i) break end + if file == filename then table.remove(io.recent_files, i) break end end - table.insert(io.recent_files, 1, utf8_filename) + table.insert(io.recent_files, 1, filename) end end @@ -193,8 +168,7 @@ end function io.reload_file() if not buffer.filename then return end local pos, first_visible_line = buffer.current_pos, buffer.first_visible_line - local filename = buffer.filename:iconv(_CHARSET, 'UTF-8') - local f, err = io.open(filename, 'rb') + local f, err = io.open(buffer.filename, 'rb') if not f then error(err) end local text = f:read('*all') f:close() @@ -206,7 +180,7 @@ function io.reload_file() buffer:line_scroll(0, first_visible_line) buffer:goto_pos(pos) buffer:set_save_point() - buffer.mod_time = lfs.attributes(filename, 'modification') + buffer.mod_time = lfs.attributes(buffer.filename, 'modification') end --- @@ -244,37 +218,34 @@ function io.save_file() if buffer.encoding then text = (buffer.encoding_bom or '')..text:iconv(buffer.encoding, 'UTF-8') end - local filename = buffer.filename:iconv(_CHARSET, 'UTF-8') - local f, err = io.open(filename, 'wb') + local f, err = io.open(buffer.filename, 'wb') if not f then error(err) end f:write(text) f:close() buffer:set_save_point() - buffer.mod_time = lfs.attributes(filename, 'modification') + buffer.mod_time = lfs.attributes(buffer.filename, 'modification') if buffer._type then buffer._type = nil end events.emit(events.FILE_AFTER_SAVE, buffer.filename) end --- --- Saves the current buffer to file *utf8_filename* or user-specified filename. +-- Saves the current buffer to file *filename* or user-specified filename. -- Emits a `FILE_SAVED_AS` event. --- @param utf8_filename Optional new filepath to save the buffer to. Must be --- UTF-8 encoded. If `nil`, the user is prompted for one. +-- @param filename Optional new filepath to save the buffer to. If `nil`, the +-- user is prompted for one. -- @name save_file_as -function io.save_file_as(utf8_filename) - if not utf8_filename then - utf8_filename = ui.dialog('filesave', - '--title', _L['Save'], - '--with-directory', - (buffer.filename or ''):match('.+[/\\]') or '', - '--with-file', - (buffer.filename or ''):match('[^/\\]+$') or '', - '--no-newline') - end - if utf8_filename == '' then return end - buffer.filename = utf8_filename +function io.save_file_as(filename) + local dir = (buffer.filename or ''):match('^.+[/\\]') or '' + local name = (buffer.filename or ''):match('[^/\\]+$') or '' + filename = filename or ui.dialog('filesave', + '--title', _L['Save'], + '--with-directory', dir, + '--with-file', name:iconv('UTF-8', _CHARSET), + '--no-newline') + if filename == '' then return end + buffer.filename = filename io.save_file() - events.emit(events.FILE_SAVED_AS, utf8_filename) + events.emit(events.FILE_SAVED_AS, filename) end --- @@ -300,7 +271,8 @@ function io.close_buffer() if buffer.dirty and ui.dialog('msgbox', '--title', _L['Close without saving?'], '--text', _L['There are unsaved changes in'], - '--informative-text', filename, + '--informative-text', + filename:iconv('UTF-8', _CHARSET), '--icon', 'gtk-dialog-question', '--button1', _L['_Cancel'], '--button2', _L['Close _without saving'], @@ -330,9 +302,7 @@ end -- of Textadept. local function update_modified_file() if not buffer.filename then return end - local utf8_filename = buffer.filename - local filename = utf8_filename:iconv(_CHARSET, 'UTF-8') - local mod_time = lfs.attributes(filename, 'modification') + local mod_time = lfs.attributes(buffer.filename, 'modification') if not mod_time or not buffer.mod_time then return end if buffer.mod_time < mod_time then buffer.mod_time = mod_time @@ -340,7 +310,7 @@ local function update_modified_file() '--title', _L['Reload?'], '--text', _L['Reload modified file?'], '--informative-text', - ('"%s"\n%s'):format(utf8_filename, + ('"%s"\n%s'):format(buffer.filename:iconv('UTF-8', _CHARSET), _L['has been modified. Reload it?']), '--icon', 'gtk-dialog-question', '--button1', _L['_Yes'], @@ -355,7 +325,7 @@ events_connect(events.BUFFER_AFTER_SWITCH, update_modified_file) events_connect(events.VIEW_AFTER_SWITCH, update_modified_file) -- Closes the initial "Untitled" buffer. -events_connect(events.FILE_OPENED, function(utf8_filename) +events_connect(events.FILE_OPENED, function(filename) local buf = _BUFFERS[1] if #_BUFFERS == 2 and not (buf.filename or buf._type or buf.dirty) then view:goto_buffer(1) @@ -368,24 +338,27 @@ end) -- @see recent_files -- @name open_recent_file function io.open_recent_file() - local i = ui.filteredlist(_L['Open'], _L['File'], io.recent_files, true, + local utf8_filenames = {} + for _, filename in ipairs(io.recent_files) do + utf8_filenames[#utf8_filenames + 1] = filename:iconv('UTF-8', _CHARSET) + end + local i = ui.filteredlist(_L['Open'], _L['File'], utf8_filenames, true, CURSES and {'--width', ui.size[1] - 2} or '') if i then io.open_file(io.recent_files[i + 1]) end end --- --- Quickly open files from *utf8_paths*, a "\n" delimited string of --- UTF-8-encoded directory paths, using a filtered list dialog. +-- Quickly open files from *paths*, a "\n" delimited string of directory paths, +-- using a filtered list dialog. -- Files shown in the dialog do not match any pattern in string or table -- *filter*, and, unless *exclude_FILTER* is `true`, `lfs.FILTER` as well. A -- filter table contains Lua patterns that match filenames to exclude, with -- patterns matching folders to exclude listed in a `folders` sub-table. -- Patterns starting with '!' exclude files and folders that do not match the -- pattern that follows. Use a table of raw file extensions assigned to an --- `extensions` key for fast filtering by extension. All strings must be encoded --- in `_G._CHARSET`, not UTF-8. The number of files in the list is capped at --- `SNAPOPEN_MAX`. --- @param utf8_paths String list of UTF-8-encoded directory paths to search. +-- `extensions` key for fast filtering by extension. The number of files in the +-- list is capped at `SNAPOPEN_MAX`. +-- @param paths String list of directory paths to search. -- @param filter Optional filter for files and folders to exclude. -- @param exclude_FILTER Optional flag indicating whether or not to exclude the -- default filter `lfs.FILTER` in the search. If `false`, adds `lfs.FILTER` to @@ -401,15 +374,16 @@ end -- @see lfs.FILTER -- @see SNAPOPEN_MAX -- @name snapopen -function io.snapopen(utf8_paths, filter, exclude_FILTER, ...) - local list = {} - for utf8_path in utf8_paths:gmatch('[^\n]+') do - lfs.dir_foreach(utf8_path, function(file) - if #list >= io.SNAPOPEN_MAX then return false end - list[#list + 1] = file:gsub('^%.[/\\]', '') +function io.snapopen(paths, filter, exclude_FILTER, ...) + local utf8_list = {} + for path in paths:gmatch('[^\n]+') do + lfs.dir_foreach(path, function(file) + if #utf8_list >= io.SNAPOPEN_MAX then return false end + file = file:gsub('^%.[/\\]', ''):iconv('UTF-8', _CHARSET) + utf8_list[#utf8_list + 1] = file end, filter, exclude_FILTER) end - if #list >= io.SNAPOPEN_MAX then + if #utf8_list >= io.SNAPOPEN_MAX then ui.dialog('ok-msgbox', '--title', _L['File Limit Exceeded'], '--text', @@ -420,6 +394,7 @@ function io.snapopen(utf8_paths, filter, exclude_FILTER, ...) '--button1', _L['_OK']) end local width = CURSES and {'--width', ui.size[1] - 2} or '' - io.open_file(ui.filteredlist(_L['Open'], _L['File'], list, false, - '--select-multiple', width, ...) or '') + local files = ui.filteredlist(_L['Open'], _L['File'], utf8_list, false, + '--select-multiple', width, ...) or '' + io.open_file(files:iconv(_CHARSET, 'UTF-8')) end diff --git a/core/lfs_ext.lua b/core/lfs_ext.lua index 36dfeffc..6e4f0ccf 100644 --- a/core/lfs_ext.lua +++ b/core/lfs_ext.lua @@ -40,20 +40,18 @@ local function exclude(file, filter) end --- --- Iterates over all files and sub-directories in the UTF-8-encoded directory --- *utf8_dir*, calling function *f* on each file found. +-- Iterates over all files and sub-directories in directory *dir*, calling +-- function *f* on each file found. -- Files *f* is called on do not match any pattern in string or table *filter*, -- and, unless *exclude_FILTER* is `true`, `FILTER` as well. A filter table -- contains Lua patterns that match filenames to exclude, with patterns matching -- folders to exclude listed in a `folders` sub-table. Patterns starting with -- '!' exclude files and folders that do not match the pattern that follows. Use -- a table of raw file extensions assigned to an `extensions` key for fast --- filtering by extension. All strings must be encoded in `_G._CHARSET`, not --- UTF-8. --- @param utf8_dir A UTF-8-encoded directory path to iterate over. --- @param f Function to call with each full file path found. File paths are --- **not** encoded in UTF-8, but in `_G._CHARSET`. If *f* returns `false` --- explicitly, iteration ceases. +-- filtering by extension. +-- @param dir The directory path to iterate over. +-- @param f Function to call with each full file path found. If *f* returns +-- `false` explicitly, iteration ceases. -- @param filter Optional filter for files and folders to exclude. -- @param exclude_FILTER Optional flag indicating whether or not to exclude the -- default filter `FILTER` in the search. If `false`, adds `FILTER` to @@ -64,7 +62,7 @@ end -- not be set otherwise. -- @see FILTER -- @name dir_foreach -function lfs.dir_foreach(utf8_dir, f, filter, exclude_FILTER, recursing) +function lfs.dir_foreach(dir, f, filter, exclude_FILTER, recursing) if not recursing then -- Convert filter to a table from nil or string arguments. if not filter then filter = {} end @@ -81,7 +79,6 @@ function lfs.dir_foreach(utf8_dir, f, filter, exclude_FILTER, recursing) local ext = filter.extensions if ext then for i = 1, #ext do ext[ext[i]] = true end end end - local dir = utf8_dir:iconv(_CHARSET, 'UTF-8') local lfs_attributes = lfs.attributes for file in lfs.dir(dir) do if not file:find('^%.%.?$') then -- ignore . and .. diff --git a/core/ui.lua b/core/ui.lua index 6e3d88ec..7f554b76 100644 --- a/core/ui.lua +++ b/core/ui.lua @@ -115,6 +115,7 @@ function ui.switch_buffer() local columns, items = {_L['Name'], _L['File']}, {} for _, buffer in ipairs(_BUFFERS) do local filename = buffer.filename or buffer._type or _L['Untitled'] + filename = filename:iconv('UTF-8', _CHARSET) local basename = buffer.filename and filename:match('[^/\\]+$') or filename items[#items + 1] = (buffer.dirty and '*' or '')..basename items[#items + 1] = filename @@ -251,6 +252,7 @@ end) -- Sets the title of the Textadept window to the buffer's filename. local function set_title() local filename = buffer.filename or buffer._type or _L['Untitled'] + filename = filename:iconv('UTF-8', _CHARSET) local basename = buffer.filename and filename:match('[^/\\]+$') or filename ui.title = string.format('%s %s Textadept (%s)', basename, buffer.dirty and '*' or '-', filename) @@ -272,13 +274,13 @@ end) events_connect(events.URI_DROPPED, function(utf8_uris) for utf8_uri in utf8_uris:gmatch('[^\r\n]+') do if utf8_uri:find('^file://') then - utf8_uri = utf8_uri:match('^file://([^\r\n]+)') - utf8_uri = utf8_uri:gsub('%%(%x%x)', function(hex) + local uri = utf8_uri:iconv(_CHARSET, 'UTF-8') + uri = uri:match('^file://([^\r\n]+)'):gsub('%%(%x%x)', function(hex) return string.char(tonumber(hex, 16)) end) - if WIN32 then utf8_uri = utf8_uri:sub(2, -1) end -- ignore leading '/' - local mode = lfs.attributes(utf8_uri:iconv(_CHARSET, 'UTF-8'), 'mode') - if mode and mode ~= 'directory' then io.open_file(utf8_uri) end + if WIN32 then uri = uri:sub(2, -1) end -- ignore leading '/' + local mode = lfs.attributes(uri, 'mode') + if mode and mode ~= 'directory' then io.open_file(uri) end end end end) @@ -352,7 +354,8 @@ events_connect(events.QUIT, function() local list = {} for _, buffer in ipairs(_BUFFERS) do if buffer.dirty then - list[#list + 1] = buffer.filename or buffer._type or _L['Untitled'] + local filename = buffer.filename or buffer._type or _L['Untitled'] + list[#list + 1] = filename:iconv('UTF-8', _CHARSET) end end return #list < 1 or ui.dialog('msgbox', diff --git a/doc/14_Appendix.md b/doc/14_Appendix.md index 5687411e..144a8602 100644 --- a/doc/14_Appendix.md +++ b/doc/14_Appendix.md @@ -145,8 +145,8 @@ non-existant graphics capabilities: ### Textadept 6 to 7 -Textadept 7 introduces API changes, a change in module mentality, and a -completely new theme implementation. +Textadept 7 introduces API changes, a change in module mentality and filename +encodings, and a completely new theme implementation. #### API Changes @@ -251,6 +251,16 @@ the user is free to choose. [`textadept`]: api/textadept.html [`_M`]: api/_M.html +#### Filename Encodings + +Prior to Textadept 7, `buffer.filename` was encoded in UTF-8 and any functions +that accepted filenames (such as `io.open_file()`) required the filenames to +also be encoded in UTF-8. This is no longer the case in Textadept 7. +`buffer.filename` is encoded in `_CHARSET` and any filenames passed to functions +should also remain encoded in `_CHARSET`. No more superfluous encoding +conversions. You should only convert to and from UTF-8 when displaying or +retrieving displayed filenames from buffers and/or dialogs. + #### Theme Changes You can use the following as a reference for converting your Textadept 6 themes diff --git a/modules/cpp/init.lua b/modules/cpp/init.lua index bfd8670c..95a7452c 100644 --- a/modules/cpp/init.lua +++ b/modules/cpp/init.lua @@ -67,8 +67,7 @@ end -- @name _G.keys.cpp keys.cpp = { [keys.LANGUAGE_MODULE_PREFIX] = { - m = {io.open_file, - (_HOME..'/modules/cpp/init.lua'):iconv('UTF-8', _CHARSET)}, + m = {io.open_file, _HOME..'/modules/cpp/init.lua'}, }, ['s\n'] = function() buffer:line_end() diff --git a/modules/lua/init.lua b/modules/lua/init.lua index d970e2c5..286dbdf6 100644 --- a/modules/lua/init.lua +++ b/modules/lua/init.lua @@ -140,8 +140,7 @@ end) -- @name _G.keys.lua keys.lua = { [keys.LANGUAGE_MODULE_PREFIX] = { - m = {io.open_file, - (_HOME..'/modules/lua/init.lua'):iconv('UTF-8', _CHARSET)}, + m = {io.open_file, _HOME..'/modules/lua/init.lua'}, }, ['s\n'] = M.try_to_autocomplete_end, } diff --git a/modules/textadept/adeptsense.lua b/modules/textadept/adeptsense.lua index 84938f24..63ee855b 100644 --- a/modules/textadept/adeptsense.lua +++ b/modules/textadept/adeptsense.lua @@ -812,7 +812,7 @@ function M.goto_ctag(sense, kind, title) if kind == M.FUNCTION or kind == M.FIELD then items[#items + 1] = kind:match('^[^#]+') -- class name end - items[#items + 1] = v[1]..':'..v[2] + items[#items + 1] = v[1]:iconv('UTF-8', _CHARSET)..':'..v[2] end local columns = {'Name', 'Location'} if kind == M.FUNCTION or kind == M.FIELD then @@ -822,7 +822,7 @@ function M.goto_ctag(sense, kind, title) '--output-column', '3') if not location then return end local path, line = location:match('^(%a?:?[^:]+):(.+)$') - io.open_file(path) + io.open_file(path:iconv(_CHARSET, 'UTF-8')) if not tonumber(line) then -- /^ ... $/ buffer.target_start, buffer.target_end = 0, buffer.length diff --git a/modules/textadept/find.lua b/modules/textadept/find.lua index 43a48223..0e912367 100644 --- a/modules/textadept/find.lua +++ b/modules/textadept/find.lua @@ -84,8 +84,7 @@ local preferred_view -- patterns matching folders to exclude listed in a `folders` sub-table. -- Patterns starting with '!' exclude files and folders that do not match the -- pattern that follows. Use a table of raw file extensions assigned to an --- `extensions` key for fast filtering by extension. All strings must be encoded --- in `_G._CHARSET`, not UTF-8. +-- `extensions` key for fast filtering by extension. -- The default value is `lfs.FILTER`, a filter for common binary file extensions -- and version control folders. -- @see find_in_files @@ -208,32 +207,30 @@ function M.find_incremental(text, next, anchor) end --- --- Searches directory *utf8_dir* or user-specified directory for files that --- match search text and options and prints the results to a files found buffer. +-- Searches directory *dir* or user-specified directory for files that match +-- search text and options and prints the results to a files found buffer. -- Use the `find_text`, `match_case`, `whole_word`, and `lua` fields to set the -- search text and option flags, respectively. Use `FILTER` to set the search -- filter. --- @param utf8_dir Optional UTF-8-encoded directory path to search. If `nil`, --- the user is prompted for one. +-- @param dir Optional directory path to search. If `nil`, the user is prompted +-- for one. -- @see FILTER -- @name find_in_files -function M.find_in_files(utf8_dir) - if not utf8_dir then - utf8_dir = ui.dialog('fileselect', +function M.find_in_files(dir) + dir = dir or ui.dialog('fileselect', '--title', _L['Find in Files'], '--select-only-directories', '--with-directory', (buffer.filename or ''):match('^.+[/\\]') or '', '--no-newline') - end - if utf8_dir == '' then return end + if dir == '' then return end local text = M.find_entry_text if not M.lua then text = text:gsub('([().*+?^$%%[%]-])', '%%%1') end if not M.match_case then text = text:lower() end if M.whole_word then text = '%f[%w_]'..text..'%f[^%w_]' end local matches = {_L['Find:']..' '..text} - lfs.dir_foreach(utf8_dir, function(file) + lfs.dir_foreach(dir, function(file) local match_case = M.match_case local line_num = 1 for line in io.lines(file) do @@ -374,7 +371,7 @@ function M.goto_file_found(line, next) local file, line_num = buffer:get_cur_line():match('^(.+):(%d+):.+$') if not file then if CURSES then view:goto_buffer(cur_buf) end return end textadept.editing.select_line() - ui.goto_file(file, true, preferred_view) + ui.goto_file(file:iconv(_CHARSET, 'UTF-8'), true, preferred_view) textadept.editing.goto_line(line_num) end events.connect(events.DOUBLE_CLICK, function(pos, line) diff --git a/modules/textadept/run.lua b/modules/textadept/run.lua index 67850924..87e292c4 100644 --- a/modules/textadept/run.lua +++ b/modules/textadept/run.lua @@ -56,8 +56,7 @@ local function command(cmd_table, compiling) if type(command) == 'function' then command = command() end preferred_view = view - local filepath = buffer.filename:iconv(_CHARSET, 'UTF-8') - local filedir, filename = '', filepath + local filepath, filedir, filename = buffer.filename, '', buffer.filename if filepath:find('[/\\]') then filedir, filename = filepath:match('^(.+[/\\])([^/\\]+)$') end @@ -92,6 +91,7 @@ local function get_error_details(message) if #captures > 0 then local details = {} for detail, i in pairs(error_detail) do details[detail] = captures[i] end + details.filename = details.filename:iconv(_CHARSET, 'UTF-8') return details end end diff --git a/modules/textadept/session.lua b/modules/textadept/session.lua index 81023328..7d10ab46 100644 --- a/modules/textadept/session.lua +++ b/modules/textadept/session.lua @@ -40,13 +40,13 @@ M.MAX_RECENT_FILES = 10 -- @see DEFAULT_SESSION -- @name load function M.load(filename) + local dir = M.DEFAULT_SESSION:match('^.+[/\\]') or '' + local name = M.DEFAULT_SESSION:match('[^/\\]+$') or '' filename = filename or ui.dialog('fileselect', '--title', _L['Load Session'], - '--with-directory', - M.DEFAULT_SESSION:match('.+[/\\]') or '', - '--with-file', - M.DEFAULT_SESSION:match('[^/\\]+$') or '', - '--no-newline'):iconv(_CHARSET, 'UTF-8') + '--with-directory', dir, + '--with-file', name, + '--no-newline') if filename == '' then return end local not_found = {} local f = io.open(filename, 'rb') @@ -127,13 +127,13 @@ end) -- @see DEFAULT_SESSION -- @name save function M.save(filename) + local dir = M.DEFAULT_SESSION:match('^.+[/\\]') or '' + local name = M.DEFAULT_SESSION:match('[^/\\]+$') or '' filename = filename or ui.dialog('filesave', '--title', _L['Save Session'], - '--with-directory', - M.DEFAULT_SESSION:match('.+[/\\]') or '', - '--with-file', - M.DEFAULT_SESSION:match('[^/\\]+$') or '', - '--no-newline'):iconv(_CHARSET, 'UTF-8') + '--with-directory', dir, + '--with-file', name:iconv('UTF-8', _CHARSET), + '--no-newline') if filename == '' then return end local session = {} local buffer_line = "buffer: %d %d %d %s" -- anchor, cursor, line, filename |