Fix a crash in sexp.

2008-09-03  Srinivasa Ragavan  <sragavan@novell.com>

	* libedataserver/e-sexp.c (parse_list): Fix a crash in sexp.

svn path=/trunk/; revision=9469

diff --git a/ChangeLog b/ChangeLog
index 8358c8d..2702d11 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2008-09-03  Srinivasa Ragavan  <sragavan@novell.com>
+
+       * libedataserver/e-sexp.c (parse_list): Fix a crash in sexp.
+
 2008-09-01  Srinivasa Ragavan  <sragavan@novell.com>
 
        * NEWS: Evolution Data Server 2.23.91 release and version bump.

diff --git a/libedataserver/e-sexp.c b/libedataserver/e-sexp.c
index 364cc65..e07eb07 100644 (file)
--- a/libedataserver/e-sexp.c
+++ b/libedataserver/e-sexp.c
@@ -1031,6 +1031,8 @@ parse_list(ESExp *f, int gotbrace)
                case G_TOKEN_IDENTIFIER:
                        e_sexp_fatal_error(f, "Unknown identifier: %s", g_scanner_cur_value(gs).v_identifier);
                        break;
+               case G_TOKEN_LEFT_PAREN:
+                       return parse_list(f, TRUE);
                default:
                        e_sexp_fatal_error(f, "Unexpected token encountered: %d", token);
                }