aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorAdrian Robert2009-06-08 04:32:42 +0000
committerAdrian Robert2009-06-08 04:32:42 +0000
commit8b3ce9a947f40bba46f14e6706f37c7ba4846ede (patch)
tree397f5c87b514b229285cb06413b03cb54434f7d1 /src
parent54f00c652d04ce70b0ded6fdce65e29cb0a44cac (diff)
downloademacs-8b3ce9a947f40bba46f14e6706f37c7ba4846ede.tar.gz
emacs-8b3ce9a947f40bba46f14e6706f37c7ba4846ede.zip
nsterm.m (ns_draw_window_cursor): Respect cursor_type for nonactive windows. (ns_init_paths): Append path separator to INFOPATH variable. (ns_use_system_highlight_color): Drop, unused.
Diffstat (limited to 'src')
-rw-r--r--src/nsterm.m19
1 files changed, 7 insertions, 12 deletions
diff --git a/src/nsterm.m b/src/nsterm.m
index 4a9a1928359..0089dc3a415 100644
--- a/src/nsterm.m
+++ b/src/nsterm.m
@@ -182,7 +182,6 @@ float ns_antialias_threshold;
182Lisp_Object ns_use_qd_smoothing; 182Lisp_Object ns_use_qd_smoothing;
183 183
184/* Used to pick up AppleHighlightColor on OS X */ 184/* Used to pick up AppleHighlightColor on OS X */
185Lisp_Object ns_use_system_highlight_color;
186NSString *ns_selection_color; 185NSString *ns_selection_color;
187 186
188/* Confirm on exit. */ 187/* Confirm on exit. */
@@ -415,7 +414,9 @@ ns_init_paths ()
415 resourcePath = [resourceDir stringByAppendingPathComponent: @"info"]; 414 resourcePath = [resourceDir stringByAppendingPathComponent: @"info"];
416 if ([fileManager fileExistsAtPath: resourcePath isDirectory: &isDir]) 415 if ([fileManager fileExistsAtPath: resourcePath isDirectory: &isDir])
417 if (isDir) 416 if (isDir)
418 setenv ("INFOPATH", [resourcePath UTF8String], 1); 417 setenv ("INFOPATH", [[resourcePath stringByAppendingString: @":"]
418 UTF8String], 1);
419 /* Note, extra colon needed to cause merge w/later user additions. */
419 } 420 }
420} 421}
421 422
@@ -2359,7 +2360,7 @@ ns_draw_window_cursor (struct window *w, struct glyph_row *glyph_row,
2359 int fx, fy, h; 2360 int fx, fy, h;
2360 struct frame *f = WINDOW_XFRAME (w); 2361 struct frame *f = WINDOW_XFRAME (w);
2361 struct glyph *phys_cursor_glyph; 2362 struct glyph *phys_cursor_glyph;
2362 int overspill, cursorToDraw; 2363 int overspill;
2363 2364
2364 NSTRACE (dumpcursor); 2365 NSTRACE (dumpcursor);
2365//fprintf(stderr, "drawcursor (%d,%d) activep = %d\tonp = %d\tc_type = %d\twidth = %d\n",x,y, active_p,on_p,cursor_type,cursor_width); 2366//fprintf(stderr, "drawcursor (%d,%d) activep = %d\tonp = %d\tc_type = %d\twidth = %d\n",x,y, active_p,on_p,cursor_type,cursor_width);
@@ -2415,8 +2416,7 @@ ns_draw_window_cursor (struct window *w, struct glyph_row *glyph_row,
2415 NSDisableScreenUpdates (); 2416 NSDisableScreenUpdates ();
2416#endif 2417#endif
2417 2418
2418 cursorToDraw = active_p ? cursor_type : HOLLOW_BOX_CURSOR; 2419 switch (cursor_type)
2419 switch (cursorToDraw)
2420 { 2420 {
2421 case NO_CURSOR: 2421 case NO_CURSOR:
2422 break; 2422 break;
@@ -2444,7 +2444,7 @@ ns_draw_window_cursor (struct window *w, struct glyph_row *glyph_row,
2444 ns_unfocus (f); 2444 ns_unfocus (f);
2445 2445
2446 /* draw the character under the cursor */ 2446 /* draw the character under the cursor */
2447 if (cursorToDraw != NO_CURSOR) 2447 if (cursor_type != NO_CURSOR)
2448 draw_phys_cursor_glyph (w, glyph_row, DRAW_CURSOR); 2448 draw_phys_cursor_glyph (w, glyph_row, DRAW_CURSOR);
2449 2449
2450#ifdef NS_IMPL_COCOA 2450#ifdef NS_IMPL_COCOA
@@ -3051,7 +3051,7 @@ ns_draw_glyph_string (struct glyph_string *s)
3051 if (s->for_overlaps || (s->cmp_from > 0 3051 if (s->for_overlaps || (s->cmp_from > 0
3052 && ! s->first_glyph->u.cmp.automatic)) 3052 && ! s->first_glyph->u.cmp.automatic))
3053 s->background_filled_p = 1; 3053 s->background_filled_p = 1;
3054 else /* 1 */ 3054 else
3055 ns_maybe_dumpglyphs_background 3055 ns_maybe_dumpglyphs_background
3056 (s, s->first_glyph->type == COMPOSITE_GLYPH); 3056 (s, s->first_glyph->type == COMPOSITE_GLYPH);
3057 3057
@@ -3594,7 +3594,6 @@ ns_set_default_prefs ()
3594 ns_antialias_text = Qt; 3594 ns_antialias_text = Qt;
3595 ns_antialias_threshold = 10.0; /* not exposed to lisp side */ 3595 ns_antialias_threshold = 10.0; /* not exposed to lisp side */
3596 ns_use_qd_smoothing = Qnil; 3596 ns_use_qd_smoothing = Qnil;
3597 ns_use_system_highlight_color = Qt;
3598 ns_confirm_quit = Qnil; 3597 ns_confirm_quit = Qnil;
3599} 3598}
3600 3599
@@ -6309,10 +6308,6 @@ allowing it to be used at a lower level for accented character entry.");
6309 DEFVAR_LISP ("ns-use-qd-smoothing", &ns_use_qd_smoothing, 6308 DEFVAR_LISP ("ns-use-qd-smoothing", &ns_use_qd_smoothing,
6310 "Whether to render text using QuickDraw (less heavy) antialiasing. Only has an effect on OS X Panther and above. Default is nil (use Quartz smoothing)."); 6309 "Whether to render text using QuickDraw (less heavy) antialiasing. Only has an effect on OS X Panther and above. Default is nil (use Quartz smoothing).");
6311 6310
6312 DEFVAR_LISP ("ns-use-system-highlight-color",
6313 &ns_use_system_highlight_color,
6314 "Whether to use the system default (on OS X only) for the highlight color. Nil means to use standard emacs (prior to version 21) 'grey'.");
6315
6316 DEFVAR_LISP ("ns-confirm-quit", &ns_confirm_quit, 6311 DEFVAR_LISP ("ns-confirm-quit", &ns_confirm_quit,
6317 "Whether to confirm application quit using dialog."); 6312 "Whether to confirm application quit using dialog.");
6318 6313