From a0db9cc855cda6890009f11150ed1da3a1b380b3 Mon Sep 17 00:00:00 2001
From: Christopher Schmidt <mr.chr.schmidt@online.de>
Date: Mon, 26 Sep 2011 12:02:10 +0000
Subject: [PATCH] Fusion: fix tag_of_fallback

[SVN r74574]
---
 include/boost/fusion/support/tag_of.hpp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/include/boost/fusion/support/tag_of.hpp b/include/boost/fusion/support/tag_of.hpp
index 5df9e84a..1c5a26e5 100644
--- a/include/boost/fusion/support/tag_of.hpp
+++ b/include/boost/fusion/support/tag_of.hpp
@@ -58,8 +58,8 @@ namespace boost { namespace fusion
 
         template <typename Sequence, typename Active>
         struct tag_of
-          : mpl::eval_if< fusion::detail::is_mpl_sequence<Sequence>,
-              mpl::identity<mpl::identity<mpl_sequence_tag> >,
+          : mpl::if_< fusion::detail::is_mpl_sequence<Sequence>,
+              mpl::identity<mpl_sequence_tag>,
               tag_of_fallback<Sequence> >::type
         {};