Mercurial > hg > xemacs-beta

comparison src/toolbar.c @ 2286:04bc9d2f42c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-09-20 19:18:55 by james] Mark all unused parameters as unused. Also eliminate some unneeded local variables.
author james
date Mon, 20 Sep 2004 19:20:08 +0000
parents 9bf5135fc04f
children ecf1ebac70d8
comparison
equal deleted inserted replaced
2285:914c5afaac33 2286:04bc9d2f42c7
1190 Fcheck_toolbar_button_syntax (XCAR (rest), Qnil); 1190 Fcheck_toolbar_button_syntax (XCAR (rest), Qnil);
1191 } 1191 }
1192 } 1192 }
1193 1193
1194 static void 1194 static void
1195 toolbar_after_change (Lisp_Object specifier, Lisp_Object locale) 1195 toolbar_after_change (Lisp_Object UNUSED (specifier),
1196 Lisp_Object UNUSED (locale))
1196 { 1197 {
1197 /* #### This is overkill. I really need to rethink the after-change 1198 /* #### This is overkill. I really need to rethink the after-change
1198 functions to make them easier to use. */ 1199 functions to make them easier to use. */
1199 MARK_TOOLBAR_CHANGED; 1200 MARK_TOOLBAR_CHANGED;
1200 } 1201 }
1221 enum toolbar_pos pos = decode_toolbar_position (Vdefault_toolbar_position); 1222 enum toolbar_pos pos = decode_toolbar_position (Vdefault_toolbar_position);
1222 Fset_specifier_dirty_flag (real_one[pos]); 1223 Fset_specifier_dirty_flag (real_one[pos]);
1223 } 1224 }
1224 1225
1225 static void 1226 static void
1226 toolbar_specs_changed (Lisp_Object specifier, struct window *w, 1227 toolbar_specs_changed (Lisp_Object UNUSED (specifier),
1227 Lisp_Object oldval) 1228 struct window *UNUSED (w),
1229 Lisp_Object UNUSED (oldval))
1228 { 1230 {
1229 /* This could be smarter but I doubt that it would make any 1231 /* This could be smarter but I doubt that it would make any
1230 noticeable difference given the infrequency with which this is 1232 noticeable difference given the infrequency with which this is
1231 probably going to be called. 1233 probably going to be called.
1232 */ 1234 */
1233 MARK_TOOLBAR_CHANGED; 1235 MARK_TOOLBAR_CHANGED;
1234 } 1236 }
1235 1237
1236 static void 1238 static void
1237 default_toolbar_specs_changed (Lisp_Object specifier, struct window *w, 1239 default_toolbar_specs_changed (Lisp_Object UNUSED (specifier),
1238 Lisp_Object oldval) 1240 struct window *UNUSED (w),
1241 Lisp_Object UNUSED (oldval))
1239 { 1242 {
1240 recompute_overlaying_specifier (Vtoolbar); 1243 recompute_overlaying_specifier (Vtoolbar);
1241 } 1244 }
1242 1245
1243 static void 1246 static void
1244 default_toolbar_size_changed_in_frame (Lisp_Object specifier, struct frame *f, 1247 default_toolbar_size_changed_in_frame (Lisp_Object UNUSED (specifier),
1245 Lisp_Object oldval) 1248 struct frame *UNUSED (f),
1249 Lisp_Object UNUSED (oldval))
1246 { 1250 {
1247 recompute_overlaying_specifier (Vtoolbar_size); 1251 recompute_overlaying_specifier (Vtoolbar_size);
1248 } 1252 }
1249 1253
1250 static void 1254 static void
1251 default_toolbar_border_width_changed_in_frame (Lisp_Object specifier, 1255 default_toolbar_border_width_changed_in_frame (Lisp_Object UNUSED (specifier),
1252 struct frame *f, 1256 struct frame *UNUSED (f),
1253 Lisp_Object oldval) 1257 Lisp_Object UNUSED (oldval))
1254 { 1258 {
1255 recompute_overlaying_specifier (Vtoolbar_border_width); 1259 recompute_overlaying_specifier (Vtoolbar_border_width);
1256 } 1260 }
1257 1261
1258 static void 1262 static void
1259 default_toolbar_visible_p_changed_in_frame (Lisp_Object specifier, 1263 default_toolbar_visible_p_changed_in_frame (Lisp_Object UNUSED (specifier),
1260 struct frame *f, 1264 struct frame *UNUSED (f),
1261 Lisp_Object oldval) 1265 Lisp_Object UNUSED (oldval))
1262 { 1266 {
1263 recompute_overlaying_specifier (Vtoolbar_visible_p); 1267 recompute_overlaying_specifier (Vtoolbar_visible_p);
1264 } 1268 }
1265 1269
1266 static void 1270 static void
1267 toolbar_geometry_changed_in_window (Lisp_Object specifier, struct window *w, 1271 toolbar_geometry_changed_in_window (Lisp_Object UNUSED (specifier),
1268 Lisp_Object oldval) 1272 struct window *w,
1273 Lisp_Object UNUSED (oldval))
1269 { 1274 {
1270 MARK_TOOLBAR_CHANGED; 1275 MARK_TOOLBAR_CHANGED;
1271 MARK_WINDOWS_CHANGED (w); 1276 MARK_WINDOWS_CHANGED (w);
1272 } 1277 }
1273 1278
1274 static void 1279 static void
1275 default_toolbar_size_changed_in_window (Lisp_Object specifier, struct window *w, 1280 default_toolbar_size_changed_in_window (Lisp_Object UNUSED (specifier),
1276 Lisp_Object oldval) 1281 struct window *UNUSED (w),
1282 Lisp_Object UNUSED (oldval))
1277 { 1283 {
1278 recompute_overlaying_specifier (Vtoolbar_size); 1284 recompute_overlaying_specifier (Vtoolbar_size);
1279 } 1285 }
1280 1286
1281 static void 1287 static void
1282 default_toolbar_border_width_changed_in_window (Lisp_Object specifier, 1288 default_toolbar_border_width_changed_in_window (Lisp_Object UNUSED (specifier),
1283 struct window *w, 1289 struct window *UNUSED (w),
1284 Lisp_Object oldval) 1290 Lisp_Object UNUSED (oldval))
1285 { 1291 {
1286 recompute_overlaying_specifier (Vtoolbar_border_width); 1292 recompute_overlaying_specifier (Vtoolbar_border_width);
1287 } 1293 }
1288 1294
1289 static void 1295 static void
1290 default_toolbar_visible_p_changed_in_window (Lisp_Object specifier, 1296 default_toolbar_visible_p_changed_in_window (Lisp_Object UNUSED (specifier),
1291 struct window *w, 1297 struct window *UNUSED (w),
1292 Lisp_Object oldval) 1298 Lisp_Object UNUSED (oldval))
1293 { 1299 {
1294 recompute_overlaying_specifier (Vtoolbar_visible_p); 1300 recompute_overlaying_specifier (Vtoolbar_visible_p);
1295 } 1301 }
1296 1302
1297 static void 1303 static void
1298 toolbar_buttons_captioned_p_changed (Lisp_Object specifier, struct window *w, 1304 toolbar_buttons_captioned_p_changed (Lisp_Object UNUSED (specifier),
1299 Lisp_Object oldval) 1305 struct window *UNUSED (w),
1306 Lisp_Object UNUSED (oldval))
1300 { 1307 {
1301 /* This could be smarter but I doubt that it would make any 1308 /* This could be smarter but I doubt that it would make any
1302 noticeable difference given the infrequency with which this is 1309 noticeable difference given the infrequency with which this is
1303 probably going to be called. */ 1310 probably going to be called. */
1304 MARK_TOOLBAR_CHANGED; 1311 MARK_TOOLBAR_CHANGED;
1305 } 1312 }
1306 1313
1307 static void 1314 static void
1308 toolbar_shadows_changed (Lisp_Object specifier, struct window *w, 1315 toolbar_shadows_changed (Lisp_Object UNUSED (specifier),
1309 Lisp_Object oldval) 1316 struct window *w,
1317 Lisp_Object UNUSED (oldval))
1310 { 1318 {
1311 struct frame *f = XFRAME (w->frame); 1319 struct frame *f = XFRAME (w->frame);
1312 1320
1313 if (!f->frame_data) 1321 if (!f->frame_data)
1314 { 1322 {