comparison plugins/tcl/tcl.c @ 8989:a88d4463d233

[gaim-migrate @ 9764] Patch from datallah for crlf losers who want to use tcl committer: Tailor Script <[e-mail]>

8988:d6fea11c62d7

		return FALSE;
	}
	len = st.st_size;

	buf = g_malloc(len + 1);
	if ((fread(buf, len, 1, fp)) != 1) {
		g_free(buf);
		fclose(fp);
		return FALSE;
	}
	fclose(fp);
	buf[len] = '\0';

	if ((interp = tcl_create_interp()) == NULL) {
		return FALSE;
	}

8989:a88d4463d233

		return FALSE;
	}
	len = st.st_size;

	buf = g_malloc(len + 1);
	
	cur = buf;	
	while (fgets(cur, (int) buf - (buf - cur), fp)) {
		cur += strlen(cur);
		if (feof(fp)) 
			break;
	}

	if (ferror(fp)) {
		gaim_debug(GAIM_DEBUG_ERROR, "tcl", "error reading %s (%s)\n", plugin->path, strerror(errno));
		g_free(buf);
		fclose(fp);
		return FALSE;
	}

	fclose(fp);

	if ((interp = tcl_create_interp()) == NULL) {
		return FALSE;
	}