diff options
| author | Charles A. Roelli | 2018-03-19 20:16:19 +0100 |
|---|---|---|
| committer | Charles A. Roelli | 2018-03-19 20:35:24 +0100 |
| commit | 7ff62ed221cc712bb2e310917dd303594f68a625 (patch) | |
| tree | e22ac876ef828a703e2c5630c8e6bb29e22c765a /lisp/term | |
| parent | 6d2e8fdd102d2d4f5105898c15813fd8dcd0907f (diff) | |
| download | emacs-7ff62ed221cc712bb2e310917dd303594f68a625.tar.gz emacs-7ff62ed221cc712bb2e310917dd303594f68a625.zip | |
Normalize and fix some mistakes in NS-related commentary
* lisp/term/ns-win.el (ns-insert-working-text): Normalize
commentary.
(x-file-dialog): Fix indentation.
* src/nsfns.m (ns_get_window, interpret_services_menu)
(x_set_background_color, x_set_icon_name, x_set_tool_bar_lines)
(x_set_icon_type, x_set_mouse_color, Fx_create_frame)
(ns_window_is_ancestor, Fns_popup_font_panel)
(Fx_display_visual_class, Fns_font_name, Fns_do_applescript)
(ns_screen_name, compute_tip_xy, Fns_mouse_absolute_pixel_position)
(handlePanelKeys): Normalize commentary (also in top-level
declarations) and remove two outdated comments (one in
Fx_create_frame, the other in compute_tip_xy).
* src/nsterm.h (NSApplication, NSWindow, ns_bitmap_record):
* src/nsselect.m:
* src/nsmenu.m (ns_update_menubar, addItemWithWidgetValue:)
(runMenuAt:forFrame:keymaps:, ns_menu_show, free_frame_tool_bar)
(update_frame_tool_bar, init)
(initWithContentRect:styleMask:backing:defer:)
(initFromContents:isQuestion:, timeout_handler:)
(Fmenu_or_popup_active_p):
* src/nsimage.m (initFromXBM, initFromXBMWithDepth):
* src/nsgui.h:
* src/nsfont.m (ns_spec_to_descriptor, ns_descriptor_to_entity)
(ns_charset_covers, ns_get_req_script, ns_findfonts)
(nsfont_list_family, nsfont_open, nsfont_encode_char)
(nsfont_draw, ns_uni_to_glyphs, ns_glyph_metrics)
(syms_of_nsfont): Normalize commentary (also in top-level
declarations).
* src/nsterm.m (ns_init_locale, ns_retain_object)
(ns_screen_margins_ignoring_hidden_dock, ns_unfocus, NSImageView)
(x_make_frame_visible, x_iconify_frame, x_destroy_window)
(x_set_undecorated, x_set_no_focus_on_map, x_set_z_group)
(ns_index_color, ns_get_color, ns_lisp_to_color)
(note_mouse_movement, scrollbar, ns_scroll_run)
(ns_draw_fringe_bitmap, ns_draw_window_cursor)
(ns_draw_text_decoration, ns_draw_relief)
(ns_dumpglyphs_box_or_relief, ns_dumpglyphs_image)
(ns_dumpglyphs_stretch, ns_draw_glyph_string, ns_send_appdefined)
(ns_check_menu_open, ns_read_socket, ns_select, ns_run_loop_break)
(ns_set_vertical_scroll_bar, ns_set_horizontal_scroll_bar)
(ns_string_to_lispmod, ns_default, ns_initialize_display_info)
(ns_delete_display, ns_term_init, sendEvent:)
(applicationDidFinishLaunching:, applicationDidBecomeActive:)
(fd_handler:, setWindowClosing:, keyDown:, insertText:)
(mouseDown:, mouseMoved:, updateFrameSize:)
(windowWillResize:toSize:, windowDidResize:, windowDidResignKey:)
(initFrameFromEmacs:, toggleFullScreen:, toolbarClicked:)
(writeSelectionToPasteboard:types:, setMiniwindowImage:)
(scrollerWidth, initFrame:window:, setFrame:, repeatScroll:)
(ns_xlfd_to_fontname, syms_of_nsterm): Normalize commentary (also in
top-level declarations), and in ns_get_color, replace a Gmane link
with one from lists.gnu.org, which does not require JS to view the
message.
Diffstat (limited to 'lisp/term')
| -rw-r--r-- | lisp/term/ns-win.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el index 1c7dd8a63fe..fa988ad5f24 100644 --- a/lisp/term/ns-win.el +++ b/lisp/term/ns-win.el | |||
| @@ -307,8 +307,8 @@ is currently being used." | |||
| 307 | "Insert contents of `ns-working-text' as UTF-8 string and mark with | 307 | "Insert contents of `ns-working-text' as UTF-8 string and mark with |
| 308 | `ns-working-overlay'. Any previously existing working text is cleared first. | 308 | `ns-working-overlay'. Any previously existing working text is cleared first. |
| 309 | The overlay is assigned the face `ns-working-text-face'." | 309 | The overlay is assigned the face `ns-working-text-face'." |
| 310 | ;; FIXME: if buffer is read-only, don't try to insert anything | 310 | ;; FIXME: if buffer is read-only, don't try to insert anything, and |
| 311 | ;; and if text is bound to a command, execute that instead (Bug#1453) | 311 | ;; if text is bound to a command, execute that instead (Bug#1453). |
| 312 | (interactive) | 312 | (interactive) |
| 313 | (ns-delete-working-text) | 313 | (ns-delete-working-text) |
| 314 | (let ((start (point))) | 314 | (let ((start (point))) |
| @@ -437,7 +437,7 @@ Lines are highlighted according to `ns-input-line'." | |||
| 437 | ;;;; File handling. | 437 | ;;;; File handling. |
| 438 | 438 | ||
| 439 | (defun x-file-dialog (prompt dir default_filename mustmatch only_dir_p) | 439 | (defun x-file-dialog (prompt dir default_filename mustmatch only_dir_p) |
| 440 | "SKIP: real doc in xfns.c." | 440 | "SKIP: real doc in xfns.c." |
| 441 | (ns-read-file-name prompt dir mustmatch default_filename only_dir_p)) | 441 | (ns-read-file-name prompt dir mustmatch default_filename only_dir_p)) |
| 442 | 442 | ||
| 443 | (defun ns-open-file-using-panel () | 443 | (defun ns-open-file-using-panel () |