diff options
| author | Andreas Schwab | 2011-08-14 11:08:02 +0200 |
|---|---|---|
| committer | Andreas Schwab | 2011-08-14 11:08:02 +0200 |
| commit | a3720aa275043aa5ee0f14c8a342183d293d6ae7 (patch) | |
| tree | 84e433b88e047a9fa99d01c30494126c640d1614 /src | |
| parent | b5f0301637acf044455c3ab39d214631f59e0d7b (diff) | |
| download | emacs-a3720aa275043aa5ee0f14c8a342183d293d6ae7.tar.gz emacs-a3720aa275043aa5ee0f14c8a342183d293d6ae7.zip | |
Follow variable naming convention
* src/gnutls.c (QCgnutls_bootprop_priority)
(QCgnutls_bootprop_trustfiles, QCgnutls_bootprop_keylist)
(QCgnutls_bootprop_crlfiles, QCgnutls_bootprop_callbacks)
(QCgnutls_bootprop_loglevel, QCgnutls_bootprop_hostname)
(QCgnutls_bootprop_min_prime_bits, QCgnutls_bootprop_verify_flags)
(QCgnutls_bootprop_verify_hostname_error)
(QCgnutls_bootprop_callbacks_verify): Rename from
Qgnutls_bootprop_..., all uses changed.
* src/xfaces.c (QCignore_defface): Rename from Qignore_defface, all
uses changed.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 14 | ||||
| -rw-r--r-- | src/gnutls.c | 66 | ||||
| -rw-r--r-- | src/xfaces.c | 12 |
3 files changed, 53 insertions, 39 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 1e18ffd5d6b..4b0ac4082a5 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,17 @@ | |||
| 1 | 2011-08-14 Andreas Schwab <schwab@linux-m68k.org> | ||
| 2 | |||
| 3 | * gnutls.c (QCgnutls_bootprop_priority) | ||
| 4 | (QCgnutls_bootprop_trustfiles, QCgnutls_bootprop_keylist) | ||
| 5 | (QCgnutls_bootprop_crlfiles, QCgnutls_bootprop_callbacks) | ||
| 6 | (QCgnutls_bootprop_loglevel, QCgnutls_bootprop_hostname) | ||
| 7 | (QCgnutls_bootprop_min_prime_bits, QCgnutls_bootprop_verify_flags) | ||
| 8 | (QCgnutls_bootprop_verify_hostname_error) | ||
| 9 | (QCgnutls_bootprop_callbacks_verify): Rename from | ||
| 10 | Qgnutls_bootprop_..., all uses changed. | ||
| 11 | |||
| 12 | * xfaces.c (QCignore_defface): Rename from Qignore_defface, all | ||
| 13 | uses changed. | ||
| 14 | |||
| 1 | 2011-08-14 Paul Eggert <eggert@cs.ucla.edu> | 15 | 2011-08-14 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 16 | ||
| 3 | * xfaces.c (Qframe_set_background_mode): Now static. | 17 | * xfaces.c (Qframe_set_background_mode): Now static. |
diff --git a/src/gnutls.c b/src/gnutls.c index 62382abc437..0743ef3f4ee 100644 --- a/src/gnutls.c +++ b/src/gnutls.c | |||
| @@ -42,19 +42,19 @@ static Lisp_Object Qgnutls_e_interrupted, Qgnutls_e_again, | |||
| 42 | static int gnutls_global_initialized; | 42 | static int gnutls_global_initialized; |
| 43 | 43 | ||
| 44 | /* The following are for the property list of `gnutls-boot'. */ | 44 | /* The following are for the property list of `gnutls-boot'. */ |
| 45 | static Lisp_Object Qgnutls_bootprop_priority; | 45 | static Lisp_Object QCgnutls_bootprop_priority; |
| 46 | static Lisp_Object Qgnutls_bootprop_trustfiles; | 46 | static Lisp_Object QCgnutls_bootprop_trustfiles; |
| 47 | static Lisp_Object Qgnutls_bootprop_keylist; | 47 | static Lisp_Object QCgnutls_bootprop_keylist; |
| 48 | static Lisp_Object Qgnutls_bootprop_crlfiles; | 48 | static Lisp_Object QCgnutls_bootprop_crlfiles; |
| 49 | static Lisp_Object Qgnutls_bootprop_callbacks; | 49 | static Lisp_Object QCgnutls_bootprop_callbacks; |
| 50 | static Lisp_Object Qgnutls_bootprop_loglevel; | 50 | static Lisp_Object QCgnutls_bootprop_loglevel; |
| 51 | static Lisp_Object Qgnutls_bootprop_hostname; | 51 | static Lisp_Object QCgnutls_bootprop_hostname; |
| 52 | static Lisp_Object Qgnutls_bootprop_min_prime_bits; | 52 | static Lisp_Object QCgnutls_bootprop_min_prime_bits; |
| 53 | static Lisp_Object Qgnutls_bootprop_verify_flags; | 53 | static Lisp_Object QCgnutls_bootprop_verify_flags; |
| 54 | static Lisp_Object Qgnutls_bootprop_verify_hostname_error; | 54 | static Lisp_Object QCgnutls_bootprop_verify_hostname_error; |
| 55 | 55 | ||
| 56 | /* Callback keys for `gnutls-boot'. Unused currently. */ | 56 | /* Callback keys for `gnutls-boot'. Unused currently. */ |
| 57 | static Lisp_Object Qgnutls_bootprop_callbacks_verify; | 57 | static Lisp_Object QCgnutls_bootprop_callbacks_verify; |
| 58 | 58 | ||
| 59 | static void gnutls_log_function (int, const char *); | 59 | static void gnutls_log_function (int, const char *); |
| 60 | static void gnutls_log_function2 (int, const char*, const char*); | 60 | static void gnutls_log_function2 (int, const char*, const char*); |
| @@ -716,17 +716,17 @@ one trustfile (usually a CA bundle). */) | |||
| 716 | return gnutls_make_error (GNUTLS_EMACS_ERROR_NOT_LOADED); | 716 | return gnutls_make_error (GNUTLS_EMACS_ERROR_NOT_LOADED); |
| 717 | } | 717 | } |
| 718 | 718 | ||
| 719 | hostname = Fplist_get (proplist, Qgnutls_bootprop_hostname); | 719 | hostname = Fplist_get (proplist, QCgnutls_bootprop_hostname); |
| 720 | priority_string = Fplist_get (proplist, Qgnutls_bootprop_priority); | 720 | priority_string = Fplist_get (proplist, QCgnutls_bootprop_priority); |
| 721 | trustfiles = Fplist_get (proplist, Qgnutls_bootprop_trustfiles); | 721 | trustfiles = Fplist_get (proplist, QCgnutls_bootprop_trustfiles); |
| 722 | keylist = Fplist_get (proplist, Qgnutls_bootprop_keylist); | 722 | keylist = Fplist_get (proplist, QCgnutls_bootprop_keylist); |
| 723 | crlfiles = Fplist_get (proplist, Qgnutls_bootprop_crlfiles); | 723 | crlfiles = Fplist_get (proplist, QCgnutls_bootprop_crlfiles); |
| 724 | /* callbacks = Fplist_get (proplist, Qgnutls_bootprop_callbacks); */ | 724 | /* callbacks = Fplist_get (proplist, QCgnutls_bootprop_callbacks); */ |
| 725 | loglevel = Fplist_get (proplist, Qgnutls_bootprop_loglevel); | 725 | loglevel = Fplist_get (proplist, QCgnutls_bootprop_loglevel); |
| 726 | verify_flags = Fplist_get (proplist, Qgnutls_bootprop_verify_flags); | 726 | verify_flags = Fplist_get (proplist, QCgnutls_bootprop_verify_flags); |
| 727 | /* verify_error = Fplist_get (proplist, Qgnutls_bootprop_verify_error); */ | 727 | /* verify_error = Fplist_get (proplist, QCgnutls_bootprop_verify_error); */ |
| 728 | verify_hostname_error = Fplist_get (proplist, Qgnutls_bootprop_verify_hostname_error); | 728 | verify_hostname_error = Fplist_get (proplist, QCgnutls_bootprop_verify_hostname_error); |
| 729 | prime_bits = Fplist_get (proplist, Qgnutls_bootprop_min_prime_bits); | 729 | prime_bits = Fplist_get (proplist, QCgnutls_bootprop_min_prime_bits); |
| 730 | 730 | ||
| 731 | if (!STRINGP (hostname)) | 731 | if (!STRINGP (hostname)) |
| 732 | error ("gnutls-boot: invalid :hostname parameter"); | 732 | error ("gnutls-boot: invalid :hostname parameter"); |
| @@ -1119,17 +1119,17 @@ syms_of_gnutls (void) | |||
| 1119 | DEFSYM (Qgnutls_code, "gnutls-code"); | 1119 | DEFSYM (Qgnutls_code, "gnutls-code"); |
| 1120 | DEFSYM (Qgnutls_anon, "gnutls-anon"); | 1120 | DEFSYM (Qgnutls_anon, "gnutls-anon"); |
| 1121 | DEFSYM (Qgnutls_x509pki, "gnutls-x509pki"); | 1121 | DEFSYM (Qgnutls_x509pki, "gnutls-x509pki"); |
| 1122 | DEFSYM (Qgnutls_bootprop_hostname, ":hostname"); | 1122 | DEFSYM (QCgnutls_bootprop_hostname, ":hostname"); |
| 1123 | DEFSYM (Qgnutls_bootprop_priority, ":priority"); | 1123 | DEFSYM (QCgnutls_bootprop_priority, ":priority"); |
| 1124 | DEFSYM (Qgnutls_bootprop_trustfiles, ":trustfiles"); | 1124 | DEFSYM (QCgnutls_bootprop_trustfiles, ":trustfiles"); |
| 1125 | DEFSYM (Qgnutls_bootprop_keylist, ":keylist"); | 1125 | DEFSYM (QCgnutls_bootprop_keylist, ":keylist"); |
| 1126 | DEFSYM (Qgnutls_bootprop_crlfiles, ":crlfiles"); | 1126 | DEFSYM (QCgnutls_bootprop_crlfiles, ":crlfiles"); |
| 1127 | DEFSYM (Qgnutls_bootprop_callbacks, ":callbacks"); | 1127 | DEFSYM (QCgnutls_bootprop_callbacks, ":callbacks"); |
| 1128 | DEFSYM (Qgnutls_bootprop_callbacks_verify, "verify"); | 1128 | DEFSYM (QCgnutls_bootprop_callbacks_verify, "verify"); |
| 1129 | DEFSYM (Qgnutls_bootprop_min_prime_bits, ":min-prime-bits"); | 1129 | DEFSYM (QCgnutls_bootprop_min_prime_bits, ":min-prime-bits"); |
| 1130 | DEFSYM (Qgnutls_bootprop_loglevel, ":loglevel"); | 1130 | DEFSYM (QCgnutls_bootprop_loglevel, ":loglevel"); |
| 1131 | DEFSYM (Qgnutls_bootprop_verify_flags, ":verify-flags"); | 1131 | DEFSYM (QCgnutls_bootprop_verify_flags, ":verify-flags"); |
| 1132 | DEFSYM (Qgnutls_bootprop_verify_hostname_error, ":verify-hostname-error"); | 1132 | DEFSYM (QCgnutls_bootprop_verify_hostname_error, ":verify-hostname-error"); |
| 1133 | 1133 | ||
| 1134 | DEFSYM (Qgnutls_e_interrupted, "gnutls-e-interrupted"); | 1134 | DEFSYM (Qgnutls_e_interrupted, "gnutls-e-interrupted"); |
| 1135 | Fput (Qgnutls_e_interrupted, Qgnutls_code, | 1135 | Fput (Qgnutls_e_interrupted, Qgnutls_code, |
diff --git a/src/xfaces.c b/src/xfaces.c index ae78a67519f..83c92cdbc52 100644 --- a/src/xfaces.c +++ b/src/xfaces.c | |||
| @@ -293,7 +293,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 293 | 293 | ||
| 294 | /* Non-zero if face attribute ATTR is `ignore-defface'. */ | 294 | /* Non-zero if face attribute ATTR is `ignore-defface'. */ |
| 295 | 295 | ||
| 296 | #define IGNORE_DEFFACE_P(ATTR) EQ ((ATTR), Qignore_defface) | 296 | #define IGNORE_DEFFACE_P(ATTR) EQ ((ATTR), QCignore_defface) |
| 297 | 297 | ||
| 298 | /* Value is the number of elements of VECTOR. */ | 298 | /* Value is the number of elements of VECTOR. */ |
| 299 | 299 | ||
| @@ -332,7 +332,7 @@ static Lisp_Object Qultra_expanded; | |||
| 332 | static Lisp_Object Qreleased_button, Qpressed_button; | 332 | static Lisp_Object Qreleased_button, Qpressed_button; |
| 333 | static Lisp_Object QCstyle, QCcolor, QCline_width; | 333 | static Lisp_Object QCstyle, QCcolor, QCline_width; |
| 334 | Lisp_Object Qunspecified; /* used in dosfns.c */ | 334 | Lisp_Object Qunspecified; /* used in dosfns.c */ |
| 335 | static Lisp_Object Qignore_defface; | 335 | static Lisp_Object QCignore_defface; |
| 336 | 336 | ||
| 337 | char unspecified_fg[] = "unspecified-fg", unspecified_bg[] = "unspecified-bg"; | 337 | char unspecified_fg[] = "unspecified-fg", unspecified_bg[] = "unspecified-bg"; |
| 338 | 338 | ||
| @@ -2853,7 +2853,7 @@ FRAME 0 means change the face on all frames, and change the default | |||
| 2853 | The value of that attribute will be inherited from some other | 2853 | The value of that attribute will be inherited from some other |
| 2854 | face during face merging. See internal_merge_in_global_face. */ | 2854 | face during face merging. See internal_merge_in_global_face. */ |
| 2855 | if (UNSPECIFIEDP (value)) | 2855 | if (UNSPECIFIEDP (value)) |
| 2856 | value = Qignore_defface; | 2856 | value = QCignore_defface; |
| 2857 | } | 2857 | } |
| 2858 | else | 2858 | else |
| 2859 | { | 2859 | { |
| @@ -3651,7 +3651,7 @@ the only relative value that users see is `unspecified'. | |||
| 3651 | However, for :height, floating point values are also relative. */) | 3651 | However, for :height, floating point values are also relative. */) |
| 3652 | (Lisp_Object attribute, Lisp_Object value) | 3652 | (Lisp_Object attribute, Lisp_Object value) |
| 3653 | { | 3653 | { |
| 3654 | if (EQ (value, Qunspecified) || (EQ (value, Qignore_defface))) | 3654 | if (EQ (value, Qunspecified) || (EQ (value, QCignore_defface))) |
| 3655 | return Qt; | 3655 | return Qt; |
| 3656 | else if (EQ (attribute, QCheight)) | 3656 | else if (EQ (attribute, QCheight)) |
| 3657 | return INTEGERP (value) ? Qnil : Qt; | 3657 | return INTEGERP (value) ? Qnil : Qt; |
| @@ -3666,7 +3666,7 @@ If VALUE1 or VALUE2 are absolute (see `face-attribute-relative-p'), then | |||
| 3666 | the result will be absolute, otherwise it will be relative. */) | 3666 | the result will be absolute, otherwise it will be relative. */) |
| 3667 | (Lisp_Object attribute, Lisp_Object value1, Lisp_Object value2) | 3667 | (Lisp_Object attribute, Lisp_Object value1, Lisp_Object value2) |
| 3668 | { | 3668 | { |
| 3669 | if (EQ (value1, Qunspecified) || EQ (value1, Qignore_defface)) | 3669 | if (EQ (value1, Qunspecified) || EQ (value1, QCignore_defface)) |
| 3670 | return value2; | 3670 | return value2; |
| 3671 | else if (EQ (attribute, QCheight)) | 3671 | else if (EQ (attribute, QCheight)) |
| 3672 | return merge_face_heights (value1, value2, value1); | 3672 | return merge_face_heights (value1, value2, value1); |
| @@ -6484,7 +6484,7 @@ syms_of_xfaces (void) | |||
| 6484 | DEFSYM (Qbackground_color, "background-color"); | 6484 | DEFSYM (Qbackground_color, "background-color"); |
| 6485 | DEFSYM (Qforeground_color, "foreground-color"); | 6485 | DEFSYM (Qforeground_color, "foreground-color"); |
| 6486 | DEFSYM (Qunspecified, "unspecified"); | 6486 | DEFSYM (Qunspecified, "unspecified"); |
| 6487 | DEFSYM (Qignore_defface, ":ignore-defface"); | 6487 | DEFSYM (QCignore_defface, ":ignore-defface"); |
| 6488 | 6488 | ||
| 6489 | DEFSYM (Qface_alias, "face-alias"); | 6489 | DEFSYM (Qface_alias, "face-alias"); |
| 6490 | DEFSYM (Qdefault, "default"); | 6490 | DEFSYM (Qdefault, "default"); |